VB字符串间怎么加空格
PrivateSubCommand1_Click()Dima,bAsIntegera=Text1b=Text2Ifa>bThenLabel1.Caption=a&bEls...
Private Sub Command1_Click()
Dim a, b As Integer
a = Text1
b = Text2
If a > b Then
Label1.Caption = a & b
Else
Label1.Caption = b & a
End If
End Sub
两个文本框,一个标签框 一个命令按钮
比如输入5 6
我想显示6 5,而我设计的显示65
怎么办 展开
Dim a, b As Integer
a = Text1
b = Text2
If a > b Then
Label1.Caption = a & b
Else
Label1.Caption = b & a
End If
End Sub
两个文本框,一个标签框 一个命令按钮
比如输入5 6
我想显示6 5,而我设计的显示65
怎么办 展开
展开全部
Private Sub Command1_Click()
Dim a, b As Integer
a = Text1
b = Text2
If a > b Then
Label1.Caption = a & chr(32) & b
Else
Label1.Caption = b & chr(32) & a
End If
End Sub
如果认为还是不明显多加几个如b & chr(32) & chr(32) & chr(32) &a
Dim a, b As Integer
a = Text1
b = Text2
If a > b Then
Label1.Caption = a & chr(32) & b
Else
Label1.Caption = b & chr(32) & a
End If
End Sub
如果认为还是不明显多加几个如b & chr(32) & chr(32) & chr(32) &a
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Dim a, b As Integer 应该是Dim a As Integer , b As Integer ,这是初学者常犯的毛病。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1、Label1.Caption = b & " " &a
2、Label1.caption=b & chr(32) & a
都可
2、Label1.caption=b & chr(32) & a
都可
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Label1.caption=b & chr(32) & a
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Label1.Caption = b & " " &a
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询