[سلام و محبه]

شكراااااااا

---

اضفت السطر التالى ليظهر اسم المستخدم فى الفورم الاساس للبرنامج

كود :

MDIParentaccounting.Txtuser_name.Text = Txtuser_name.Text

لكن لم يعمل ما الحل ؟

كود :

Private Sub BtnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogin.Click

       If Txtuser_name.Text.Trim <> "" Or Txtuser_password.Text.Trim <> "" Then
           ' اذا كانت القيمة العائدة من الفنكشن  ترو
           If ValidateLogin(Txtuser_name.Text, Txtuser_password.Text) = True Then
               Dim frm As New MDIParentaccounting
               frm.Show()
               Me.Hide()
               MDIParentaccounting.Txtuser_name.Text = Txtuser_name.Text

               'MDIParentaccounting.TxtCmb_user_id.Text=

           Else
               MessageBox.Show("اسم المستخدم او كلمة المرور خاطئة", Application.ProductName, MessageBoxButtons.OK)
               Exit Sub
           End If
       Else
           MessageBox.Show("الرجاء ادخال اسم المستخدم و كلمة المرور ", Application.ProductName, MessageBoxButtons.OK)
       End If

   End Sub

حاولت ضغط الملف ب winrar لارفعه على الموقع لم ينضغط