08-03-13, 09:36 PM
(آخر تعديل لهذه المشاركة : 08-03-13, 09:58 PM {2} بواسطة ahmed mohamed soliman.)
سعود كتب :بانتظار كود الربط باداة Listview
لكي اعرف الحدث المناسب.
[COLOR="#FF0000"]
بارك الله فيك اخي ،،، جاري التجربة
هل تقصد انك تقوم بالاضافة الى ListView ؟؟
اذا كان قصدك كذا ،،، فتترى الطريقة ليست عبارة عن اضافة في الليست فيو بل هي امر اضهار بيانات قاعدة البيانات من الليست فيو يعني مثل كذا ...
تكتب في اوامر لود الفورم هذا
كود :
ListView1.View = View.Details
ListView1.FullRowSelect = True
ListView1.GridLines = True
ListView1.RightToLeft = RightToLeft.Yes
ListView1.RightToLeftLayout = True
ListView1.ContextMenuStrip = ContextMenuStrip1
ListView1.HideSelection = False
ListView1.Columns.Add("ID", 60)
ListView1.Columns.Add("الاسم", 100)
ListView1.Columns.Add("الرقم", 100)
Me.RefreshListViewوالآن هذا امر جلب المعلومات من قاعدة البيانات الى الليست فيو ،،،
كود :
Sub RefreshListView()
'Fill the Grid
ListView1.Items.Clear()
Dim ds As New DataSet("Table1")
Dim dt As New DataTable()
Dim sqladp As New SqlDataAdapter("SELECT * FROM Table1", Conn)
sqladp.Fill(ds, "Table1")
dt = ds.Tables("Table1")
Dim pos As Integer
For pos = 0 To dt.Rows.Count - 1
Dim item As New ListViewItem()
item.Text = dt.Rows(pos)("ID").ToString()
item.SubItems.Add(dt.Rows(pos)("UserName").ToString())
item.SubItems.Add(dt.Rows(pos)("MobileNumber")).ToString()
ListView1.Items.Add(item)
Next pos
Conn.Close()
End Subلا تنسى تعديل البيانات ...
وياليت تقولي اش نوع الحقل الي وضعته للصورة ؟

