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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] ربط الفجوال بيسيك بالاكسل عن طريق اداة الادو ADODC larbihamri 8 243 15-01-17, 03:07 PM
آخر رد: larbihamri
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 3 158 06-01-17, 12:04 AM
آخر رد: ياسر عبد الكريم
  طلب اداة active skin tighrmte 1 53 20-12-16, 05:20 PM
آخر رد: sendbad100
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 169 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [سؤال] كيف اعطل مجموعة من التكست بوكس او جميعها او اي اداة على الفورم allobaed 4 155 25-10-16, 03:48 PM
آخر رد: allobaed
  تعديل على كود بسيط في list mohfar 0 149 14-07-16, 11:18 PM
آخر رد: mohfar
  [سؤال] طلب عكس اتجاه اداة Office Ribbon 2007 من اليمين الى اليسار administrator 4 260 05-03-16, 07:57 PM
آخر رد: administrator
  ما هو افضل اداة لتجميل الفورم بدون مشاكل عند التستيب mhareek 0 209 03-02-16, 10:17 AM
آخر رد: mhareek
  سوال حول ترتيب list superwoofer 3 337 19-12-15, 05:37 PM
آخر رد: superwoofer
  مشكلة List superwoofer 6 452 17-12-15, 10:27 AM
آخر رد: superwoofer

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


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