数据库中获得的字符串，如何让它变成一个控件

Question

比如：我从数据库中获得窗体"Form1"存在一个变量X中,想使用它的Form1.show功能，但是X.show会报错，大家有什么好的解决办法吗？

Answer 1

http://topic.csdn.net/u/20110801/17/2cfb6861-5436-429f-bdcb-9bff488721d5.html

Answer 2

不行，Set FormX = fm.Controls.Add("VB.Form", author_key.Fields("form_id").Value)
'Form'不是有效的控件类型

Answer 3

Private Sub Command1_Click()
Dim X As String
X = "form2"
Select Case X
  Case "form2"
     Form2.Show
  Case "form3"
     Form3.Show
End Select
End Sub

Answer 4

Private Sub Command1_Click()
Dim X As String, X1 As Object
X = "form1"
Select Case X
   Case "form1"
      Set X1 = New Form1
   Case "form2"
      Set X1 = New Form2
End Select
X1.Show
End Sub