تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال حول كود الاضافه
#1
مرحبا لدي مشكله ف هذا الكود الخاص  بالاضافه فارجو المساعده فيهPrivate Sub Combo6_Change()
Combo6.Text = Data1.Recordset![ÇáÍÇáå ÇáÇÌÊãÇÚíå]
If Combo6.Text = "ãÊÒæÌ" Or Combo6.Text = "ãØáÞ" Or Combo6.Text = "ÇÚÒÈ" Or Combo6.Text = "ÇÑãá" Then
Exit Sub
Else
Combo6.Text = ""
End If
End Sub

Private Sub Command1_Click()
On Error GoTo 1:
If (Text1.Text = "") Or (Text2.Text = "") Or (Text3.Text = "") Or (Text4.Text = "") Or (Text5.Text = "") Or (Combo1.Text = "") Or (Combo2.Text = "") Or (Combo3.Text = "") Or (Combo5.Text = "") Or (Text10.Text = "") Or (Combo6.Text = "") Then
MsgBox "íÑÌÆ ãáÆ ÇáÍÞæá ÇáÝÇÑÛå"
Else
Data1.Recordset.AddNew
Data1.Recordset![ÇáÇÓã] = Text1.Text
Data1.Recordset![ÇáÚãÑ] = Text2.Text
Data1.Recordset![ÇáæÒä] = Text3.Text
Data1.Recordset![ÇáÚäæÇä] = Text4.Text
Data1.Recordset![ÊÇÑíÎ ÇÎÑ ÒíÇÑå] = Text5.Text
Data1.Recordset![ÍÇáå ÇáÇÈ ] = Combo1.Text
Data1.Recordset![ÍÇáå ÇáÇã] = Combo2.Text
Data1.Recordset![ÝÕíáå ÇáÏã] = Combo3.Text
Data1.Recordset![ÇáÌäÓ] = Combo5.Text
Data1.Recordset![ÇáåÇÊÝ] = Text10.Text
Data1.Recordset![ÇáÍÇáÉ ÇáÇÌÊãÇÚíå] = Combo6.Text
Data1.Recordset.Update
Data2.Recordset.Edit
Data2.Recordset![ÇáÇÓã] = Text1.Text
Data2.Recordset.updata
Form4.Hide
Form5.Show
End If
1:
Exit Sub
End Sub
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [C#.NET] ممكن سؤال دموع الوطن 2 93 23-09-18, 04:14 AM
آخر رد: محمد كريّم
  سؤال عن كيفية جلب صورة أو ملف صوتي من مجلد داخل المشروع بتقنية WPF younass 2 150 01-09-18, 02:43 PM
آخر رد: elgokr
  سؤال عن كيفية فتح فورم داخل فورم اخر بتقنية WPF younass 0 124 30-08-18, 01:28 AM
آخر رد: younass
  سؤال عن كيفية تحديد قيمة عمود في السطر المحدد في datagrid مع تقنية wpf younass 8 285 27-08-18, 11:10 PM
آخر رد: elgokr
  سؤال عن كيفية نقل البيانات من بعض الاعمدة من اكسس او الاكسل الى SQl server younass 1 122 04-08-18, 11:50 PM
آخر رد: Finish
  سؤال حول الاجراءات المخزنة في قاعدة البيانات younass 2 141 31-07-18, 03:22 PM
آخر رد: younass
  سؤال عن كيفية عرض حقول معينة في dataGridView1 علما اني الاستعلام يكون لجميع الحقول younass 2 153 29-07-18, 05:13 PM
آخر رد: younass
  [نقاش] سؤال للإداره والمشرفين DOX.1 2 150 23-02-18, 10:50 PM
آخر رد: DOX.1
  سؤال عن أفضل لغة لعمل المكتبات احمد محمد السيد 1 216 07-10-17, 02:44 AM
آخر رد: silverlight
  سؤال , هل هناك ثقنية في السي شارب للتحكم في design مثل JAVA fx ؟ samodix 1 196 22-09-17, 08:27 PM
آخر رد: محمد كريّم

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


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