CSDN博客

img lang_csdn

限制文本框为数字

发表于2004/10/16 19:18:00  611人阅读

分类: VB6.0

If KeyAscii = 8 Then Exit Sub
If Not IsNumeric(Chr(KeyAscii)) Then KeyAscii = 0
阅读全文
0 0

相关文章推荐

img
取 消
img