Question

在VB 语句中 x = Val(Text1.Text) Val 是什么意思？

Dim y As Integer
Private Sub Command1_Click()
Text2.Text = y
End Sub

Private Sub Text1_Change()
x = Val(Text1.Text)
If x < 0 Or x > 100 Then
Text1.Text = ""
Text1.SetFocus
Label1.Caption = "请重新输入"
Else
Label1.Caption = "输入正确"
y = x
End If
End Sub
Val 是什么意思？ 还有 Else 是什么意思？

Answer 1

'Val函数是将数值型字符串转换为数值型变量，一般用来赋值。
'你上面的语句在TEXT1的内容为空或不是数值时就会出错，最好加上数值检测函数:ISNUMERIC ,如下:
Private Sub Text1_Change()
IF ISNUMERIC(TEXT1.TEXT)=FALSE THEN
MSGBOX "请输入数值!", vbExclamation, "提示"
Exit Sub
ENDIF
x = Val(Text1.Text)
'...

Answer 2

val是把其它内容转成数值，IF 如果对 ELSE否则错

Answer 3

将字符串格式转化成数值吧