Private Sub Op1_Click(Index As Integer)
''给考生的程序：
'    Dim a As String, b As String, c As String
'    a = "我坐"
'    b = "我开"
''    Select Case ?
'        Case 0
'            Text1.Text = a + Me.Op1(0).Caption + "去"
'        Case 1
''            Text1.Text = ? + Me.Op1(1).Caption + "去"
'        Case 2
'            Text1.Text = b + Me.Op1(2).Caption + "去"
'    End Select