Question

vb的if语句做optionbutton

如果选择了OPT1，则按下comman就计算text1 + text2，如果选择了OPT2,则按下comman就计算text1 - text2，如果两个都没选择就弹出msgbox"请选择opt" 这个语句该怎么写

Answer 1

Option Explicit

Private Sub Command1_Click()
    Dim Result As Long
    If Option1.Value = True Then
        Result = Text1 + Text2
        Print "Result的值为" & Result
    ElseIf Option2.Value = True Then
        Result = Text1 - Text2
        Print "Result的值为" & Result
    Else
        MsgBox "请选择opt"
    End If
End Sub

有问题请追问，满意请采纳，新年快乐！加油！

追问

您好，很感谢你的回答，我还想知道msgbox出来之后，按下确定，如果想text1和text2清零，改加上什么语句?

追答

Text1.Text = "": Text2.Text = ""