有關Form Load問題一問....(編號：2384)

我的Form上有Text1,Command1，我要如何才能做到Click Command1後，開啟Text1.Text名稱的Form。
目前我的程式如下，必須在Command1_Click()中的Load要直接將Form名稱打上，十分不理想(因我的Form有很多個)，我試過直接Load Text1.text但行不通，請問有什麼方法可以類似直接Load Text1.text，請您不吝指教，謝謝！
Private Sub Command1_Click()
Load ModifyPassword
　　OpenForm Text1.Text
End Sub
Public Sub OpenForm(ByVal sFormName As String)
Dim frm As Form
……………..
For Each frm In Forms
If frm.Name = sFormName Then
frm.Show
Exit Sub
End If
Next
…………….
End Sub