- 6
- 0
- 约5.19万字
- 约 37页
- 2022-10-09 发布于天津
- 举报
第6 章 控件与用户窗体
范例67 文本框只能输入数值
Private Sub TextBox1_KeyPress(ByVal KeyANSI As MSForms.ReturnInteger)
With TextBox1
Select Case KeyANSI
Case Asc(0) To Asc(9)
Case Asc(-)
If InStr(1, .Text, -)
原创力文档

文档评论(0)