excel2003，为什么我在输入数字时总会自动形成小数

textbox中如何限定小数长度

你试试看这样行吗。 假设文本框的名字是text1 添加如下代码。 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then Exit Sub '可以按退格 If InStr(Text1。 Text, "。") = 0 Then Text1。MaxLength = 6 Else Text1。MaxLength = 7 If Len(Text1。Text) - InStr(Text1。 Text, "。") = 2 And Len(Text1。Text) <> 2 Then KeyAscii = 0 If Ke...全部

  你试试看这样行吗。 假设文本框的名字是text1 添加如下代码。 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then Exit Sub '可以按退格 If InStr(Text1。
  Text, "。") = 0 Then Text1。MaxLength = 6 Else Text1。MaxLength = 7 If Len(Text1。Text) - InStr(Text1。
  Text, "。") = 2 And Len(Text1。Text) <> 2 Then KeyAscii = 0 If KeyAscii = 46 And InStr(Text1。Text, "。
  ") = 0 Then Exit Sub '可以输入一个小数点 If KeyAscii 57 Then KeyAscii = 0 '只能输入数字 End Sub 。收起