[emamtron2014]

السلام عليكم
عندي برنامج وبه عدد كبير من الفورم
واريد ان افتح الفورم علي حسب النص الموجود في تكست بوكس
بمعني انه في الفورم الرئيسي يوجد تكست بوكس.وعندما يكتب المستخدم في التكست بوكس مثلا Form1  يقوم البرنامج بفتح هذا الفورم
وجزاكم الله خيرا.

[عبدالله الدوسري]

وعليكم السلام

كود :

       Select Case TextBox1.Text.Trim.ToLower
           Case "Form1".ToLower
               Dim Form1 As New Form1
               Form1.Show()
           Case "Form2".ToLower
               Dim Form2 As New Form2
               Form2.Show()
           Case "Form3".ToLower
               Dim Form3 As New Form3
               Form3.Show()
           Case "Form4".ToLower
               Dim Form4 As New Form4
               Form4.Show()
           Case "Form5".ToLower
               Dim Form5 As New Form5
               Form5.Show()
           Case Else
               MsgBox("لا توجد نافذة بنفس الاسم")
       End Select

[emamtron2014]

جزاك الله خير الجزاء  يا اخي وجعله في ميزان حسناتك ان شاء الله