程序有问题
以上问题都不成立
或者用Private Sub Text1_KeyPress(k As Integer)
或者用If keyascii < Asc("0") Or keyascii > Asc("9") Then
1.Text1获得输入焦点后,依次输入1.3.5, label1显示: b, 531
2.Text1获得输入焦点后,依次输入2.7.9, label1显示: a.972
3.Text1获得输入焦点后,依次输入-2.3.5, label1显示:c.532
4.Text1获得输入焦点后,依次输入1.2.a.5, label1显示: d.521
file 用法:描述|通用符 例如要设置显示txt就txt|*.txt