16-11-13, 10:43 PM
كود الاربط اداة list view بقاعدة البيانات وكود الادخال لبيانات باداة list view وكود الاظهار بيانات الاداة list view في فورم اخر عند الضغط مرتين على الخانة التي بها ادوات
[سؤال] اداة list view
|
16-11-13, 10:43 PM
كود الاربط اداة list view بقاعدة البيانات وكود الادخال لبيانات باداة list view وكود الاظهار بيانات الاداة list view في فورم اخر عند الضغط مرتين على الخانة التي بها ادوات
تم الشكر بواسطة: ذي قاري
16-11-13, 11:35 PM
هل تستطيع الربط بين قاعدة البيانات و بين تكست بوكس مثلا ؟
17-11-13, 03:14 PM
[video=dailymotion]http://[/video]:blush::blush::blush::blush::blush::blush::blush::blush::blush::blush::blush:
23-11-13, 07:37 PM
(آخر تعديل لهذه المشاركة : 23-11-13, 07:37 PM {2} بواسطة مبرمج هاوي.)
اخي الكريم
السلام عليكم هذه طريقة تعبئة اللست فيو من الداتا بيز ارجو ان تستفيد منها شكرا ''' 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 |
|
المواضيع المحتمل أن تكون متشابهة . | |||||
الموضوع : | الكاتب | الردود : | المشاهدات : | آخر رد | |
اداة عرق التقارير فيجوال 6 | علي جابر | 1 | 152 |
18-01-24, 01:48 PM آخر رد: Taha Okla |
|
[vb6.0] سؤال في اداة فليكس جريد vb6 | tighrmte | 3 | 492 |
16-02-23, 02:37 AM آخر رد: tighrmte |
|
طلب طريقة استعراض التقرير في اداة CRViewer1 | ahmed250 | 3 | 1,682 |
09-06-20, 05:15 AM آخر رد: Ahmed_Mansoor |
|
مشكلة في اضافة اداة btn enh | ahmed210 | 0 | 987 |
11-04-20, 12:23 AM آخر رد: ahmed210 |
|
جمع العمود داخل اداة msflexgrid | ahmed20 | 2 | 1,836 |
09-02-20, 10:25 PM آخر رد: ahmed20 |
|
عرض تقرير داخل اداة داخل فورم عادي | Benmouha | 3 | 1,993 |
19-01-20, 01:03 AM آخر رد: اسلام الكبابى |
|
هل هناك اداة افضل من msflexgrid لعرض السجلات | gonm64 | 2 | 1,539 |
07-01-20, 08:58 PM آخر رد: gonm64 |
|
مشكل في سكين مع اداة التاريخ | tighrmte | 3 | 1,923 |
12-12-19, 01:17 AM آخر رد: tighrmte |
|
اريد تعديل اداة MSFlexGrid فى هذا المشروع | cckills2010 | 3 | 1,893 |
11-12-19, 03:02 AM آخر رد: Ahmed_Mansoor |
|
تنفيذ امر على اداة flexgrid | gonm64 | 5 | 1,920 |
12-11-19, 05:33 PM آخر رد: awidan76 |