今天做到
随机输入一组数值比较哪个大，并且显示出来
如：
Dim a As Single, b As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
If a > b Then
Label1.Caption = a
Else
Label1.Caption = b
End If
那么我在text1或者text2里面输入字符也是可以的，只不过运算出来的结果都是0
有什么办法能禁止在text1或者text2里面输入除数字以外的字符和符号呢？

麻烦大家不吝赐教啊

if Not isNumeric(Text1.Text) then
msgbox "不是数字"
end if

val(字符)=0

感谢，去试下

val是什么东西啊，

请看msdn

msdn在哪里可以下载啊，不懂

置 顶.