تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] عمل رساله تاكيد للحذف
#1
السلام عليكم 

عندي هذا الكود للحذف 

وانا اريد ان اضع رساله تنبيه هل تريد الحذف 

اذا تم الضغط على نعم يحذف المعامله

اذا تم الضغط على لا    لايتم حذف المعامله 

هذا هو الكود المراد التعديل عليه
كود :
Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click

        conn.Open()
        Try
            Dim cmddelete As New OleDbCommand
            cmddelete.CommandText = "delete from tan where idmt = '" + txtid_m.Text + "'"
            cmddelete.Connection = conn
            cmddelete.ExecuteNonQuery()
            MsgBox("تمت حذف جميع بيانات الشخص بنجاح")
            txtname_m.Clear()
            txtmustlm.Clear()
            txtnum_q.Clear()
            txtid_m.Clear()
            a1.Clear()
            Textalhalh.Clear()
        Catch ex As Exception
            MsgBox(ex.Message.ToString)
        End Try
        conn.Close()
    End Sub


شاكر لكم 
الرد }}}}
تم الشكر بواسطة:
#2
PHP كود :
       Dim result As DialogResult MessageBox.Show("هل تريد حذف البيانات""Info"MessageBoxButtons.YesNo)
 
       If result DialogResult.No Then
            
' لا تحذف البيانات
        ElseIf result = DialogResult.Yes Then
            ' 
إحذف البيانات
        End 
If 
الرد }}}}
تم الشكر بواسطة: رومنس الشوق , الشاكي لله
#3
ماقصرت يالغالي

الكود شغال تمام
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ظهور رساله لما ابغى اربط اكسس بالفجول بيسك a.baomar 3 105 11-03-17, 03:24 AM
آخر رد: khodor1985
Question [VB.NET] كيف اضع لمستخدم رساله في حال اسم المستخدم وكلمة المرور غير صيحه ؟؟ Microformt 2 333 22-08-16, 09:28 PM
آخر رد: سعود
  [VB.NET] شباب عند برمجة كود اعادة الترقيم تظهر لى رساله احمد عبد الحكيم 1 573 08-02-16, 08:22 PM
آخر رد: احمد عبد الحكيم
  [سؤال] تغيير عنوان رساله التنبية نسيم الترك1 2 387 10-01-16, 09:47 PM
آخر رد: نسيم الترك1
  [سؤال] شباب عند نقل البرنامج على جهاز العميل ظهرت لى رساله خطأ فى الكريستال ريبورت احمد عبد الحكيم 2 622 17-07-15, 12:14 PM
آخر رد: atefkhalf2004
  [VB.NET] تظهر رساله No Symbols Found rezeq2001 1 320 27-06-15, 11:32 AM
آخر رد: rezeq2001
  كود اضهار رساله عند الخطاء hassan 2 471 20-04-14, 06:44 PM
آخر رد: Aly El-Haddad
  [VB.NET] رساله من الـ DataGridView bumb 4 715 16-04-14, 12:58 AM
آخر رد: bumb
  [VB.NET] ظهور رساله في نافذة immediate windows bumb 11 1,961 05-03-14, 05:15 AM
آخر رد: الشاكي لله
  [سؤال] رساله عند تعارض تاريخين ؟ Mido9 5 1,087 25-10-13, 04:52 PM
آخر رد: ناجي إبراهيم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم