تقييم الموضوع :
  • 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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 4 327 28-04-17, 03:14 AM
آخر رد: أبوسعود
  سؤال حوال اداة التاريخ والوقت مع التقارير كنونو 2 77 27-04-17, 05:17 PM
آخر رد: كنونو
  [vb6.0] ربط datepicker مع اداة ADODC larbihamri 5 128 01-04-17, 01:55 PM
آخر رد: larbihamri
  سؤال فى التقارير اداة داتا ريبورت محمودالصياد محمود 1 100 25-02-17, 11:39 PM
آخر رد: السيد الغالي
  لدي مجلد يحتوي ملفات مختلفة أريد فقط إظهار الصور في list الخير طهوري 4 203 17-02-17, 12:12 AM
آخر رد: الخير طهوري
  كيفية نسخ محتويات الأداة List الخير طهوري 2 156 14-02-17, 10:49 PM
آخر رد: الخير طهوري
Question [سؤال] اداة listbox professional sniper 1 468 08-02-17, 03:33 AM
آخر رد: AL_BRNS
  حذف سجل وتعديل سجل من اداة تعديلMSFlexGrid عمر سالم 6 201 06-02-17, 02:57 AM
آخر رد: sendbad100
  [vb6.0] ربط الفجوال بيسيك بالاكسل عن طريق اداة الادو ADODC larbihamri 8 451 15-01-17, 03:07 PM
آخر رد: larbihamri
  طلب اداة active skin tighrmte 1 169 20-12-16, 05:20 PM
آخر رد: sendbad100

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


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