[填空题] 在窗体上画名称为Command1、标题为"计算"的命令按钮;画两个文本框,名称分别为Text1和Text2;然后画4个标签,名称分别为Label1、Label2、Label3和Label4,标题分别为" *** 作数1"、" *** 作数2"、"运算结果"和空白;再建立一个含有4个单选按钮的控件数组,名称为Option1,标题分别为"+"、"-"、"*"和"/"。程序运行后,在Text1、Text2中输入两个数值,选中一个单选按钮后单击命令按钮,相应计算结果显示在Label4中,程序运行情况如图所示。请在空处填入适当的内容,将程序补充完整。
Private Sub Command1_Click()
Fori=0 To 3
If (9) =True Then
opt=Option1(i).Caption
End If
Next
Select Case (10)
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)<
正确答案:Optionl(i).Value
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)