请教这个VB语句……
Label1.Caption=Str(a)+"+"+Str(b)+"="+Str(c)无法理解为什么有那么多+“+”PrivateSubCommand1_Click()D...
Label1.Caption = Str(a) + "+" + Str(b) + "=" + Str(c)
无法理解为什么有那么多+“+”
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
Dim c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a + b
Label1.Visible = True
Label1.Caption = Str(a) + "+" + Str(b) + "=" + Str(c)
End Sub
Private Sub Command2_Click()
Dim a As Single
Dim b As Single
Dim c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a - b
Label1.Visible = True
Label1.Caption = Str(a) + "-" + Str(b) + "=" + Str(c)
End Sub
Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Label1.Visible = False
End Sub
Private Sub Command4_Click()
End
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Label1.Visible = False
End Sub 展开
无法理解为什么有那么多+“+”
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
Dim c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a + b
Label1.Visible = True
Label1.Caption = Str(a) + "+" + Str(b) + "=" + Str(c)
End Sub
Private Sub Command2_Click()
Dim a As Single
Dim b As Single
Dim c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a - b
Label1.Visible = True
Label1.Caption = Str(a) + "-" + Str(b) + "=" + Str(c)
End Sub
Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Label1.Visible = False
End Sub
Private Sub Command4_Click()
End
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Label1.Visible = False
End Sub 展开
3个回答
展开全部
标签1的文本为:a+b=c.(a,b,c分别代表一个变量,里面是什么内容,a就是什么)
带引号的“+”就是一个字符而已
1楼的朋友理解错了
比如text1里的内容为2,text2里的内容为3,那么a,b,c的值就分别为为2,3,5,标签的内容为2+3=5
带引号的“+”就是一个字符而已
1楼的朋友理解错了
比如text1里的内容为2,text2里的内容为3,那么a,b,c的值就分别为为2,3,5,标签的内容为2+3=5
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
+就是连接字符串,比如 a+b输出来就是 ab,但如果是数字的话,比如 1+2,那么就是 3。
而引号中的 +,即 "+",则是字符串,输出来的时候就是 +
而引号中的 +,即 "+",则是字符串,输出来的时候就是 +
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
+ 在这里的作用是把数组str(a) ,str(b) str(c) 里面的内容合并成一个字符串,然后复制给lable的caption.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询