VB代码提示语法错误

End IfIf Check2; "考试科目" &s1&amp.Value = 1 Thens2 = "英语"Elses2 = &quot:"End IfText1; sex &amp.Text = "性别;"End IfIf Check3; &"&quotPrivate Sub Command1_Click()Dim sex As StringDim s1 As String, s2 As String, s3 As StringIf Option1.Value = True Thensex = "男"Elsesex = "女"End IfIf Check1.Value = 1 Thens3 = "政治"Elses3 = &quot.Value = 1 Thens1 = "数学"Elses1 = &quot

政治", S3 As String
If Option1;女"
End If
If Check1.Value = 1 Then
S1 = ", S2 As String;
Else
S1 = ""
End If
If Check2.Value = 1 Then
S2 = "考试科目"
Else
S2 = ""
End If
If Check3.Value = 1 Then
S3 = "Text1.Text = "性别:" & sex & "数学"性别:" & sex & "英语"
Else
S3 = ""
End If
Text1.Text = ".Value = True Then
sex = "男"
Else
sex = "。
Dim sex As String
Dim S1 As String; & S1 & S2 & S3
别的地方没有发现错误;考试科目"

& 这个符号的前后都要有空格

jbp22d5f90f0a，你究竟是何方神圣？以jbp打头的名字上百个，财富值794710，提问数122627，回答数0，提问永远匿名，从不加分，很少采纳，每次一提问就是几十个问题一起发，举报管理员也不受理，你是管理员他爹？