تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اداة list view
#1
Question 
كود الاربط اداة list view بقاعدة البيانات وكود الادخال لبيانات باداة list view وكود الاظهار بيانات الاداة list view في فورم اخر عند الضغط مرتين على الخانة التي بها ادوات
الرد }}}}
تم الشكر بواسطة: ذي قاري
#2
هل تستطيع الربط بين قاعدة البيانات و بين تكست بوكس مثلا ؟
الرد }}}}
تم الشكر بواسطة:
#3
ارفق مثالك وراح يتم التعديل علية الموضوع سهل
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}}
تم الشكر بواسطة:
#4
[video=dailymotion]http://[/video]:blush::blush::blush::blush::blush::blush::blush::blush::blush::blush::blush:
الرد }}}}
تم الشكر بواسطة:
#5
اخي الكريم
السلام عليكم
هذه طريقة تعبئة اللست فيو من الداتا بيز
ارجو ان تستفيد منها
شكرا

''' LV1 = listView
''''' RSP = RecordSet

With LV1
.View = lvwReport
.ListItems.Clear
For i = 1 To 7
.ColumnHeaders.Add i
Next i
.ColumnHeaders.Clear
.ColumnHeaders.Add , , "ÊÓáÓá", .Width * 0.1
.ColumnHeaders.Add , , "ÑÞã ÇáåÇÊÝ", .Width * 0.15, 2
.ColumnHeaders.Add , , "ÇáÇÓã", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÇÈ", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÌÏ", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÌäÓ", .Width * 0.15, 2
.ColumnHeaders.Add , , "ÊÇÑíÎ ÇáãíáÇÏ", .Width * 0.15, 2
If RSP.RecordCount = 0 Then Exit Sub
RSP.MoveFirst
i = 0
Do While Not RSP.EOF
i = i + 1
.ListItems.Add i, , RSP!No & " "
.ListItems(i).SubItems(1) = RSP!PhoneNo & " "
.ListItems(i).SubItems(2) = RSP!First & " "
.ListItems(i).SubItems(3) = RSP!Father & " "
.ListItems(i).SubItems(4) = RSP!Grand & " "
.ListItems(i).SubItems(5) = RSP!Sex & " "
.ListItems(i).SubItems(6) = RSP!Birth & " "
RSP.MoveNext
Loop
RSP.MoveFirst
End With

اخي الكريم
السلام عليكم
هذه طريقة تعبئة اللست فيو من الداتا بيز
ارجو ان تستفيد منها
شكرا

''' LV1 = listView
''''' RSP = RecordSet

With LV1
.View = lvwReport
.ListItems.Clear
For i = 1 To 7
.ColumnHeaders.Add i
Next i
.ColumnHeaders.Clear
.ColumnHeaders.Add , , "ÊÓáÓá", .Width * 0.1
.ColumnHeaders.Add , , "ÑÞã ÇáåÇÊÝ", .Width * 0.15, 2
.ColumnHeaders.Add , , "ÇáÇÓã", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÇÈ", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÌÏ", .Width * 0.12, 2
.ColumnHeaders.Add , , "ÇáÌäÓ", .Width * 0.15, 2
.ColumnHeaders.Add , , "ÊÇÑíÎ ÇáãíáÇÏ", .Width * 0.15, 2
If RSP.RecordCount = 0 Then Exit Sub
RSP.MoveFirst
i = 0
Do While Not RSP.EOF
i = i + 1
.ListItems.Add i, , RSP!No & " "
.ListItems(i).SubItems(1) = RSP!PhoneNo & " "
.ListItems(i).SubItems(2) = RSP!First & " "
.ListItems(i).SubItems(3) = RSP!Father & " "
.ListItems(i).SubItems(4) = RSP!Grand & " "
.ListItems(i).SubItems(5) = RSP!Sex & " "
.ListItems(i).SubItems(6) = RSP!Birth & " "
RSP.MoveNext
Loop
RSP.MoveFirst
End With
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال فى التقارير اداة داتا ريبورت محمودالصياد محمود 1 38 25-02-17, 11:39 PM
آخر رد: السيد الغالي
  لدي مجلد يحتوي ملفات مختلفة أريد فقط إظهار الصور في list جورج190 4 132 17-02-17, 12:12 AM
آخر رد: جورج190
  كيفية نسخ محتويات الأداة List جورج190 2 87 14-02-17, 10:49 PM
آخر رد: جورج190
Question [سؤال] اداة listbox professional sniper 1 426 08-02-17, 03:33 AM
آخر رد: AL_BRNS
  حذف سجل وتعديل سجل من اداة تعديلMSFlexGrid عمر سالم 6 106 06-02-17, 02:57 AM
آخر رد: sendbad100
  [vb6.0] ربط الفجوال بيسيك بالاكسل عن طريق اداة الادو ADODC larbihamri 8 315 15-01-17, 03:07 PM
آخر رد: larbihamri
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 3 203 06-01-17, 12:04 AM
آخر رد: ياسر عبد الكريم
  طلب اداة active skin tighrmte 1 105 20-12-16, 05:20 PM
آخر رد: sendbad100
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 215 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [سؤال] كيف اعطل مجموعة من التكست بوكس او جميعها او اي اداة على الفورم allobaed 4 245 25-10-16, 03:48 PM
آخر رد: allobaed

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


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