如何在FORM中建立一个COMBO，在COMBO的下来菜单中选中一个项目，单击后能弹出一个FORM??????

Question

什么不行？
试试把
Private Sub Combo1_Click()
    Form2.Show
End SubPrivate Sub Form_Load()
    Combo1.AddItem "2345234"
    Combo1.AddItem "2323"
    Combo1.AddItem "asdfsd"
End Sub

Answer 1

不行阿Combo1.AddItem "2345234"只能显示"2345234"。我要的是选定"2345234"点击能弹出个FORM来！！！急！！！！

Answer 2

Private Sub Form_Load()
    MyCombo.AddItem "Form-1"
    MyCombo.AddItem "Form-2"
    MyCombo.AddItem "Form-3"
End SubPrivate Sub MyCombo_Click()
    Select Case MyCombo.Text
        Case "Form-1"
            Form1.Show
        Case "Form-2"
            Form2.Show
        Case "Form-3"
            Form3.Show
    End Select
End Sub

Answer 3

Private Sub Combo1_Click()
If Combo1.Text = "我们是朋友" Then
Form2.Show
End If
End SubPrivate Sub Form_Load()
Combo1.AddItem "你好"
Combo1.AddItem "我们是朋友"
Combo1.AddItem "相互学习"
End Sub在运行程序之前，先设置combox的text属性为:你好当点击其中的：我们是朋友 时form2显示！我试过了！好用的！