Question

在窗体上画2个文本框，名称分别为TEXT1和text2；然后画2个标签，标题分别为“操作数1”“操作数2”

画一个命令按钮，名称为command 1，标题为计算。再建立一个含有4个单选按钮，标题为+—*/的控件按钮，名称为OPTION1；
再建立两个标签，名为label3和label4，标题为运算结果和空白
在text1 text2中输入2个数值，选中一个单选按钮后，单击命令按钮后，项应的计算结果显示在LABEL4处
代码如下
Private Sub Command1_Click()
For i = 0 To 3
if ? =true then
opt = option1(i).Caption
End If
selsect case ?
Case "+"
result = Val(text1.Text) + Val(text2.Text)
Case "-"
result = Val(text1.Text) - Val(text2.Text)
Case "*"
result = Val(text1.Text) * Val(text2.Text)
Case "/"
result = Val(text1.Text) / Val(text2.Text)
End Select
?=result
End Sub
问号处填什么代码？？？？

Answer 1

Private Sub Command1_Click()
For i = 0 To 3
If Option1(i).Value = True Then
opt = Option1(i).Caption
End If
Select Case opt
Case "+"
result = Val(text1.Text) + Val(text2.Text)
Case "-"
result = Val(text1.Text) - Val(text2.Text)
Case "*"
result = Val(text1.Text) * Val(text2.Text)
Case "/"
result = Val(text1.Text) / Val(text2.Text)
End Select
label4.Caption = result
End Sub