[asemshahen5]

تستطيع ذلك بكود قبل زر العرض :
مثلا عندنا فورم به ببساطة زر يعرض مسج بوكس و نريد نفس النافذة بنفس الزر و لكن الاختلاف بالرسالة المعروضة .

نبدأ على بركة الله نعمل 2 فورم فورم رئيسي و الفورم الذي تكلمنا عنه و نضيف موديل نعرف فيه رقم :

PHP كود :

Module Module1
    Public FrmMsg1 As Integer
End Module 


نضع في الفورم ماين الفورم الاول زرين نكتب بهما :

PHP كود :

   Private Sub BtnFrm2_Click(sender As Object, e As EventArgs) Handles BtnFrm2.Click
        Dim Frm As New Form2
        FrmMsg1 = 2
        Frm.ShowDialog()
    End Sub

    Private Sub BtnFrm1_Click(sender As Object, e As EventArgs) Handles BtnFrm1.Click
        Dim Frm As New Form2
        FrmMsg1 = 1
        Frm.ShowDialog()
    End Sub 


و نضع بالفورم الثان زر نضع فيه :

PHP كود :

   Private Sub MsgBox_Click(sender As Object, e As EventArgs) Handles MsgBox.Click
        If FrmMsg1 = 1 Then
            MessageBox.Show("فورم التجربة الاول")
        ElseIf FrmMsg1 = 2 Then
            MessageBox.Show("فورم التجربة الثان")
        End If
    End Sub 


امل ان تكون الفكرة وصلت .