我的语句哪儿错了?(vb)

错误语句:*Private Sub Command1_Click() a = Text1.Text b = Text2.Text x = Label2.Caption y = Label3.Caption z = Label4.Caption If a < b Then x = "" If a >= b Then x = a 尀 b If a >= b Then y = a Mod b b = z If a < b Then a = y End Sub
2026年09月27日 03:09
有2个网友回答
网友(1):

你的代码中有许多处错误:
1、变量类型不断变换。
x先是String类型:
x = Label2.Caption
If a < b Then x = ""
然后又变成Integer类型。
If a >= b Then x = a \ b
2、不可变的至赋给可变的值,同时也是把目标值赋给参数值:
x = Label2.Caption
y = Label3.Caption
z = Label4.Caption
b = z
If a < b Then a = y
3、目标没有被赋值。
根据你的代码估计,你可能是想要实现下面的目标:
Private Sub Command1_Click()
a = Text1.Text
b = Text2.Text
If a < b Then x = 0
If a >= b Then x = a \ b
If a >= b Then y = a Mod b
z = b
If a < b Then y = a
Label2.Caption = x
Label3.Caption = y
Label4.Caption = z

End Sub

网友(2):

x = a \ b 应该是x=a/b