详细内容
vb2005中的小问题 |
|
2008-10-30 20:38:49 提供者:vb2005 浏览次数 |
|
CaseChrW(Keys.Back) CaseChrW(Keys.D0) CaseChrW(Keys.D1) CaseChrW(Keys.D2) CaseChrW(Keys.D3) CaseChrW(Keys.D4) CaseChrW(Keys.D5) CaseChrW(Keys.D6) CaseChrW(Keys.D7) CaseChrW(Keys.D8) CaseChrW(Keys.D9) CaseElse e.KeyChar=CChar("") EndSelect下面的是VB6.0的,可以参考下:在TEXTBOX的KEYPRESS事件中加入:IfNot((KeyAscii |
