VB代码问题,说缺少语句结束,求电脑大神助攻。。

PrivateSubCommand1_Click()DimSexAsStringDimS1AsString,S2AsString,S3AsStringIfOption1.... Private Sub Command1_Click()
Dim Sex As String
Dim S1 As String, S2 As String, S3 As String
If Option1.Value = True Then
Sex = "男"
Else
Sex = "女"
End If
If Check1.Value = 1 Then
S1 = "数学"
Else
S1 = ""
End If
If Check2.Value = 1 Then
S2 = "英语"
Else
S2 = ""
End If
If Check3.Value = 1 Then
S3 = "政治"
Else
S3 = ""
End If
Text1.Text="性别:"&Sex&"考试科目为:"&S1&S2&S3
End Sub
一段VB代码,提示说缺少语句结束,◑﹏◐但我才学3天,不知道那里错了,求大神助攻~
展开
 我来答
数学王子他
2014-07-19 · TA获得超过1706个赞
知道小有建树答主
回答量:510
采纳率:100%
帮助的人:499万
展开全部
Text1.Text = "性别:" & Sex & "考试科目为:" & S1 & S2 & S3
注意:连接运算符“&”的左右两边都要有一个空格
livingroom宝贝
推荐于2016-09-09 · TA获得超过1081个赞
知道小有建树答主
回答量:534
采纳率:100%
帮助的人:301万
展开全部
把"Text1.Text="性别:"&Sex&"考试科目为:"&S1&S2&S3"
一行改为
Text1.Text = "性别:" & sex & " 考试科目为:" & s1 & s2 & s3

你的错误在于:s1&s2&s3 没有用空格隔开。如这样:s1 & s2 & s3
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式