Question

VB 多分支结构

建立单选按钮数组，来改变text1中的显示内容，不知道代码错在哪里了，希望高手指点迷津！！万分感激！
只想利用多分支结构的方法
Private Sub Form_Load()
Text = " "
Select Case Index
Case 0
Text1.Text = "颐和园"
Case 1
Text1.Text = "兵马俑"
Case 2
Text1.Text = "西湖"
End Select
End Sub
该如何修改呢？

Answer 1

Private Sub Option1_Click(Index As Integer)
Select Case Index
Case "0"
Text1.Text = "颐和园"
Case "1"
Text1.Text = "兵马俑"
Case " 2"
Text1.Text = "西湖"
End SelectEnd Sub
Private Sub Form_Load()
Text = " "End Sub是单选按钮数组呀，看错了，不好意思

Answer 2

你要把选择放到Command1_Click里：Private Sub Command1_Click(Index As Integer)
Text = " "
Select Case Index
Case 0
Text1.Text = "颐和园"
Case 1
Text1.Text = "兵马俑"Case 2
Text1.Text = "西湖"
End Select
End Sub

Answer 3

你有没有把form的autoredraw属性改为true？