vb加法计算代码

答案:6 悬赏:30 手机版

解决时间 2021-04-06 06:21

提问者网友：我的未来我做主
2021-04-05 09:02

vb加法计算代码

最佳答案

五星知识达人网友：孤独的牧羊人
2021-04-05 10:37

Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=Val(Text1.Text)
b=Val(Text2.Text)
Text3.Text=a+b
End Sub
在这段VB程序中，“a=Val(Text1.Text)
b=Val(Text2.Text)”是加法的代码

全部回答

1楼网友：洎扰庸人
2021-04-05 15:42

您的程序代码似乎没有贴全请贴全

2楼网友：鸽屿
2021-04-05 14:46

Text1.Text 和Text2.Text都是 string 的
而vb中+和&都是连接符号
所以变成了22 而不是4
先进行数据类型转换
楼上的对！

3楼网友：躲不过心动
2021-04-05 13:10

Label2.Caption = Text1.Text + Text2.Text
的类型是
String = String + String
即变成
String = String & String
所以你的2+2=22
你可以用Val(String)即
Label2.Caption = Val(Text1.Text) + Val(Text2.Text)
使之成为
String = Double + Double
从而顺利相加
当然也可以
Label2.Caption = Text1.Text * 1 + Text2.Text
这个好像是
String = Long + Long

4楼网友：孤独入客枕
2021-04-05 11:55

Label2.Caption = Text1.Text + Text2.Text
这错了你可以这么写
Text1.Text=A
Text2.Text=B
S=A+B
Label2.Caption =STR(S)
也可以
Label2.Caption = VAL(Text1.Text) + VAL(Text2.Text)

5楼网友：西风乍起
2021-04-05 10:57

Private Sub Command1_Click()
Label2.Caption = Val(Text1.Text) + Val(Text2.Text)
End Sub

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！