[Adrees]

قم بتعديل الكود الى التالي وسيعمل باذن الله

كود :

cmd.CommandText = "Select * from tblCustomers where CivilRegNum=@n"
               cmd.Parameters.Add("@n", OleDbType.VarChar).Value = txtCRN.Text.ToString

[bumb]

الله يسلمك

اشتغل تمام

[bumb]

لبسلام عليكم

الكود يشتغل تمام بس لما اضغط على مفتاح TAB يظهر Error

[Adrees]

جرب هذه الطريقة

كود :

cmd.CommandText = "Select * from tblCustomers where CivilRegNum=@n"
               cmd.Parameters.Add("@n", OleDbType.VarChar).Value = txtCRN.Text.ToString

[bumb]

تمام االله يعافيك

اذا ممكن تعطيني كود يمنع المستخدم انه يكتب في أي تكست بوكس اذا كان السجل المدني فارغ

تحياتي لك

[Adrees]

في الحدث Form1_Load اكتب الكود التالي

كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If txtCRN.Text = "" Then
            TextBox1.Enabled = False
            TextBox2.Enabled = False
            TextBox3.Enabled = False
        End If

    End Sub

وفي الحدث txtCRN_TextChanged اكتب هذا الكود

كود :

Private Sub txtCRN_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtCRN.TextChanged
        If txtCRN.Text = "" Then
            TextBox1.Enabled = False
            TextBox2.Enabled = False
            TextBox3.Enabled = False

        Else
            TextBox1.Enabled = True
            TextBox2.Enabled = True
            TextBox3.Enabled = True

        End If

    End Sub

[bumb]

الله يسلمك مشكور وما قصرت