Question

VB中怎么区分赋值与等号

例如：
在计算器设计中除数不能为零添加判断语句
If Num2 = 0 Then
MsgBox "对不起，除数不能为零", vbDefaultButton1, "提示信息"
Else
Division = Num1/Num1
End If
注：Visual Basic中等号和赋值是一个符号“=”

Answer 1

VB6.0中关于=号有以下几类用法：

1）比较运算符，用来比较表达式。

比较运算符示例：

本示例示范各种“比较运算符”的用法。这类运算符通常拿来做表达式结果的比较。

Private Sub Form_Click()
    Dim MyResult, Var1, Var2
    MyResult = (45 < 35)   ' 返回 False。
    Debug.Print MyResult
    MyResult = (45 = 45)   ' 返回 True。
    Debug.Print MyResult
    MyResult = ("5" > "4")   ' 返回 True。
    Debug.Print MyResult
End Sub

2）条件判断式中使用做等于号（=），见以下代码用法：

Private Sub Command1_Click()
    a = 1
    b = InputBox("输入b", b)
    If a + b = 4 Then
        Print "Ok"
    Else
        Print "Error"
    End If
End Sub

其中    If a + b = 4 Then  句中使用的是等于用法。

3）= 操作符，用于对一个变量或属性赋值。

给变量和属性赋值

BackColor = 255

VScroll1.Value = 100

MaxRows = 50

第一个语句改变当前活动窗体的属性，第二个语句改变 VScroll1 的一个属性，第三个语句则给变量赋值。

用赋值语句进行计算，并将结果赋予变量：

ApplesSold = 10      '将值10传给变量。

ApplesSold = ApplesSold + 1      '变量值增一。

Answer 2

等号用双等于号==，赋值用等于号=，有时两者区别不是很明显。
就针对你这个来说吧，If Num2 = 0表示你在计算的时候给Num2赋值为0，也就是说你输入0，则后面的除法则错误。
再说等于吧，若你在前面Num2是一个变量，在IF这里Num2的值是计算取得的，你就要用==，这是表示经过上面的计算后，得出num2的值是0时，后面的除法就发生错误。

不知LZ满意否？

Answer 3

逻辑运算中就是等于号，否则就是赋值号。举例如下：

条件 判断语句中 作为关系运算
比如 if x=2 then
while x=2
until x=2
其余语句中作为赋值
x=2
x=x+2

Answer 4

VB中的赋值和比较运算符号=是同样的,
用于赋值运算就是等号,用于比较用算即等于.

你的程序有点问题.
Division = Num1/Num1
除数应该是Num2

Answer 5

逻辑运算中就是等于号，否则就是赋值号。