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
怎么办
展开
 我来答
ahgckjzx_126
2008-08-05
知道答主
回答量:13
采纳率:0%
帮助的人:0
展开全部
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
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
lxz1969
2008-08-05 · TA获得超过1.1万个赞
知道大有可为答主
回答量:8524
采纳率:33%
帮助的人:1.1亿
展开全部
Dim a, b As Integer 应该是Dim a As Integer , b As Integer ,这是初学者常犯的毛病。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
lishock
2008-08-05 · TA获得超过106个赞
知道答主
回答量:78
采纳率:0%
帮助的人:41.3万
展开全部
1、Label1.Caption = b & " " &a
2、Label1.caption=b & chr(32) & a
都可
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
小坏坏007
2008-08-05 · 超过30用户采纳过TA的回答
知道答主
回答量:155
采纳率:0%
帮助的人:65.5万
展开全部
Label1.caption=b & chr(32) & a
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
烂掉の萝卜49d6
2008-08-05 · TA获得超过679个赞
知道小有建树答主
回答量:1233
采纳率:100%
帮助的人:952万
展开全部
Label1.Caption = b & " " &a
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 2条折叠回答
收起 更多回答(4)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式