在考生文件夹下有一个工程文件stj3.vbp，相应的窗体文件为stj3.frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮；两个水平滚动条，名称分别为Hscroll1和Hscroll2，其Max属性均为100，Min属性均为1；四个标签，名称分别为Lable1、Lable2、Lable3和Lable4，标题分别为“运算数1”、“运算数2”、“运算数结果”和空白；此外还有一个包含有四个单选按钮的控件数组，名称为Option1，标题分别为“+”、“-”、“*”、“/”，如图所示。程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击命令按钮，相应的计算结果将显示在Lable4中，程序运行情况如图所示。这个程序不完整，请把它补充完整，并能正确运行。
试题源程序：
1 Private Sub Command1_Click( )
2 For i=0 To 3
3 If =True Then
4 opt=Option1(i).Caption
5 End If
6 Next
7 Select Case
8 Case "+"
9 Result=HScroll1.Value+HScroll2.Value
10 Case "-"
11 Result=HScroll1.Value-HScroll2 Value
12 Case "*"
13 Result=HScroll1.Value*HScroll2.Value
14 Case "/"
15 Result=HScroll1.Value/HScroll2.Value
16 End Select
17 Label4.Caption=Str(HScroll1.Value) &" "&opt&Str(RScroll2.Value) & "=" & Str(Result)
18 End Sub
在考生文件夹下有一个工程文件stj3.vbp，相应的窗体文件为stj3.frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮；两个水平滚动条，名称分别为Hscroll1和Hscroll2，其Max属性均为100，Min属性均为1；四个标签，名称分别为Lable1、Lable2、Lable3和Lable4，标题分别为“运算数1”、“运算数2”、“运算数结果”和空白；此外还有一个包含有四个单选按钮的控件数组，名称为Option1，标题分别为“+”、“-”、“*”、“/”，如图所示。程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击命令按钮，相应的计算结果将显示在Lable4中，程序运行情况如图所示。这个程序不完整，请把它补充完整，并能正确运行。
试题源程序：
1 Private Sub Command1_Click( )
2 For i=0 To 3
3 If =True Then
4 opt=Option1(i).Caption
5 End If
6 Next
7 Select Case
8 Case "+"
9 Result=HScroll1.Value+HScroll2.Value
10 Case "-"
11 Result=HScroll1.Value-HScroll2 Value
12 Case "*"
13 Result=HScroll1.Value*HScroll2.Value
14 Case "/"
15 Result=HScroll1.Value/HScroll2.Value
16 End Select
17 Label4.Caption=Str(HScroll1.Value) &" "&opt&Str(RScroll2.Value) & "=" & Str(Result)
18 End Sub
