在文本中限制只输入数字，但如何限制数字的位数？
Private Sub Text1_KeyPress(KeyAscii As Integer)
 If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 8 And KeyAscii <> 46 Then
        KeyAscii = 0
    End If

End Sub

[[it] 本帖最后由 jxawgyl 于 2008-6-3 20:19 编辑 [/it]]

谢了，真的太感谢三断笛。