منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : User control
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ازاي ابرمج الuser control انها تاخد من قاعدة البيانات اكسس والبرنامج يعمل مجموعة من اليوزر كنترول بعدد البيانات الموجودة داخل الداتا جريد فيو
الــUserControl هو نفسه يعتبر Form لكن من دون حواف وبرمجته بالضبط مثل الفورم و كانك في فورم له احداث وتضع ادوات.
(17-07-22, 03:53 AM)سعود كتب : [ -> ]الــUserControl هو نفسه يعتبر Form لكن من دون حواف وبرمجته بالضبط مثل الفورم و كانك في فورم له احداث وتضع ادوات.
انا عايز الكود اللي يربطه بقاعدة البيانات مع تكرار user control بحسب صفوف قاعدة البيانات
(17-07-22, 01:26 PM)كيرلس رفعت كتب : [ -> ]
(17-07-22, 03:53 AM)سعود كتب : [ -> ]الــUserControl هو نفسه يعتبر Form لكن من دون حواف وبرمجته بالضبط مثل الفورم و كانك في فورم له احداث وتضع ادوات.
انا عايز الكود اللي يربطه بقاعدة البيانات مع تكرار user control بحسب صفوف قاعدة البيانات

بصراحة كنت اظنه ممكن لاني مجرب الويب لكن لم  الكود اللذي استخدمه
PHP كود :
       For i As Integer 0 To lst.Count 1
            Dim u 
As New uc1
            u
.lbl.Text lst.Keys(i)
 
           Panel1.Controls.Add(u)
 
       Next 

PHP كود :
Public Class Form1
    Dim lst 
As New Dictionary(Of StringString)
 
   Dim i As Integer 0
    Dim k 
As Integer 0
    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        If k 
>= lst.Count Then Exit Sub
        Dim uc 
As New uc1
        uc
.Top i
        i 
+= (uc.Height 20)
 
       uc.lbl.Text lst.Keys(k)
 
       Panel1.Controls.Add(uc)
 
       k += 1
    End Sub
    Private Sub Form1_Load
(sender As System.ObjectAs System.EventArgsHandles MyBase.Load
        lst
.Add("منتدى فيجوال بيسك للعرب""http://vb4arb.com/vb/index.php")
 
       lst.Add("منتدى الفريق العربي للبرمجة""http://arabteam2000.com")
 
       lst.Add("منتدى دلفي للعرب""https://delphi4arab.net/forum/")
 
   End Sub
End 
Class 
طبعا اهم شي الطريقة اذا عرفتها طبقها على قاعدة بيانات .