تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ترقيم التقائي حسب ما اختاره من الكومبو
#1
السلام عليكم.ايام و ليالي رمضانية مباركة.اخواني لو سمحتو كيف يمكن لما اختار بالفورم 2 من الكومبوبكس مثلا الرقم 1 و اضغط على زر add يطلع مباشرة بالتاكست بوكس 1 الرقم يلي موجود بقاعدة بيانات Table1 و اسمو First_Record
لمل اختار من الكمبو الارقام حسب nu_calling يطلع بالتاكست firstrecord تبعها.شكرا


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 98.02 ك ب / التحميلات : 31)
الرد
تم الشكر بواسطة:
#2
وعليكم السلام
شوف  اللي اضفت للمشروع
متغير على مستوي الفورم

PHP كود :
Dim dt As DataTable 

إجراء مستقل لتحميل البيانات للكومبوبوكس
PHP كود :
Private Sub gd()
 
       Using myconnection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" Application.StartupPath "\DATAMMM.accdb")
 
           Using da As New OleDbDataAdapter("select * from Table1"myconnection)
 
               dt = New DataTable
                da
.Fill(dt)
 
               ComboBox1.DataSource dt
                ComboBox1
.DisplayMember "NU_CALLING"
 
           End Using
        End Using
    End Sub 

عند حدث الفورم لود
PHP كود :
gd() 
عند حدث ComboBox1_SelectedIndexChanged
PHP كود :
        If ComboBox1.Items.Count 0 Then Exit Sub
        
If dt.Rows.Count 0 Then Exit Sub
        TextBox1
.Text dt(ComboBox1.SelectedIndex)("first_record"
الرد
#3
اجمل تقييم لاخي الرائع سعود.الهي يبارك بعمرك وهو المطلوب بالضبط الف شكر
الرد
تم الشكر بواسطة: سعود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال بخصوص حفظ قيمة في الكومبو بوكس abdullhadi999 7 229 17-11-18, 02:52 PM
آخر رد: elgokr
  اريد ترقيم الداتا جريد فيو سمير جمال 6 211 15-11-18, 01:32 PM
آخر رد: عبدالله الدوسري
  استدعاء الصنف الى الكومبو بوكس salah mansour 1 115 11-11-18, 11:02 PM
آخر رد: Rabeea Qbaha
  كيف يمكنني إعداد ترقيم تلقائي ويتجدد الترقيم في كل سنة mram3242 11 633 30-10-18, 01:34 AM
آخر رد: DOX.1
  ترقيم ذكي DOX.1 2 141 29-10-18, 06:33 PM
آخر رد: elgokr
  تعبئة الداتا جريد فيو عن طريق اختيار الكومبو بوكس فراس الغزي 7 401 18-08-18, 05:49 PM
آخر رد: elgokr
  [سؤال] عن الكومبو بوكس moniam 5 249 03-06-18, 11:15 AM
آخر رد: moniam
  طلب بخصوص الكومبو بوكس احمد خطاب خطاب 0 190 13-04-18, 08:56 AM
آخر رد: احمد خطاب خطاب
  [سؤال] سؤال بخصوص الكومبو بوكس احمد خطاب خطاب 2 241 12-04-18, 01:17 AM
آخر رد: احمد خطاب خطاب
  [كود] ترقيم سجلات كل صفحة في الكريستال محمد بن عطية 2 335 06-04-18, 02:22 AM
آخر رد: محمد بن عطية

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


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