[求助]VB6单选框判断
下面的代码是练习题:
Private Sub Command1_Click()
p1 = "姓名:" & Text1.Text & Chr(13)
p2 = "年龄:" & Text2.Text & "岁" & Chr(13)
p3 = "现就职于:" & Text3.Text & Chr(13)
p4 = "性别:" & IIf(Option1.Value, "男", "女") & Chr(13)
p5 = "婚姻状况:" & IIf(Option3.Value, "已婚", "未婚") & Chr(13)
p6 = "学历:" & Combo1.Text & Chr(13)
p7 = "职称:" & Combo2.Text
p = p1 & p2 & p3 & p4 & p5 & p6 & p7
MsgBox p, , Text1.Text & "的个人情况介绍"
End Sub
IIf函数只能判断2个单选框!我想问问各位前辈,如果我是三个单选框该用什么函数来判断?并且把它赋值给P5
用一句话代码来判断,不用逐个判断然后再赋值的代码行不行?