例如:
在计算器设计中除数不能为零添加判断语句
If Num2 = 0 Then
MsgBox "对不起,除数不能为零", vbDefaultButton1, "提示信息"
Else
Division = Num1/Num1
End If
注:Visual Basic中等号和赋值是一个符号“=”
VB6.0中关于=号有以下几类用法:
1)比较运算符,用来比较表达式。
比较运算符示例:
本示例示范各种“比较运算符”的用法。这类运算符通常拿来做表达式结果的比较。
Private Sub Form_Click()2)条件判断式中使用做等于号(=),见以下代码用法:
Private Sub Command1_Click()其中 If a + b = 4 Then 句中使用的是等于用法。
3)= 操作符,用于对一个变量或属性赋值。
给变量和属性赋值
BackColor = 255
VScroll1.Value = 100
MaxRows = 50
第一个语句改变当前活动窗体的属性,第二个语句改变 VScroll1 的一个属性,第三个语句则给变量赋值。
用赋值语句进行计算,并将结果赋予变量:
ApplesSold = 10 '将值10传给变量。
ApplesSold = ApplesSold + 1 '变量值增一。