KeyAscii通过引用传递,对它进行改变可给对象发送一个改变 的字符。如将 Keyascii改变为0时可取消击键,这样一来对象便 接收不到所按键的字符。 例如,数字的ASC码是在48~57范围,下列事件处理只允许用 户在文本框中输入数字(非数字字符被取消击键): 19 9 1 1 Private Sub Text1 KeyPress(keyAscii As Integer) If KeyAscii<48 Or keyascil>57Then'输入为非数字字符 KeyAscii=0'抑制非数字字符的输入 End if End subKeyAscii通过引用传递，对它进行改变可给对象发送一个改变 的字符。如将KeyAscii改变为0时可取消击键，这样—来对象便 接收不到所按键的字符。 例如，数字的ASCII码是在48~57范围，下列事件处理只允许用 户在文本框中输入数字（非数字字符被取消击键）： 例9_1_1 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then ' 输入为非数字字符 KeyAscii = 0 ' 抑制非数字字符的输入 End If End Sub