[moha8080]

(18-11-19, 05:44 AM)asemshahen5 كتب : هذا كود زر العديل :

PHP كود :

   Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        Dim StrSQL As String = "UPDATE DB_DB SET DB_PCNUM='" & Textserpc.Text & "', DB_XPNUM='" & Textserxp.Text & "' Where DB_SERNUM='" & Textsernum.Text & "'"
        Dim da As New SqlDataAdapter(StrSQL, conn)
        Dim dt1 As New DataTable
        da.Fill(dt1)
        MsgBox("تم الحفظ")
    End Sub 


كل الشكر لك اخي عاصم واخر سؤال و اوعدك ان يكون اخر سؤال لي بالمنتدي وبعد ذلك سوف اتفرغ لي مساعدت الاخرين 
اذا كان لدي تسكت بوكس علي الفورم اريد عند وضع شئ به يستعلم عنه في الجدول الاول DB_SERNUM اذا كان موجود يعمل سيلكت علي الصف كامل و اذا كان غير موجود تظهر رساله