12-12-20, 12:56 AM
(12-12-20, 12:42 AM)اليوم السابع كتب :(12-12-20, 12:17 AM)muharam كتب :كيف(12-12-20, 12:15 AM)اليوم السابع كتب :(12-12-20, 12:13 AM)muharam كتب :(12-12-20, 12:06 AM)اليوم السابع كتب : الله ينور تمام و الكود ده كمان شغال بشكل كويس
كود :
Dim fieldNames As String() = New String() {"ProductID", "ProductName", "QuantityPerUnit", "UnitPrice"}
Dim column As DevExpress.XtraGrid.Columns.GridColumn
GridView1.Columns.Clear()
For i As Integer = 0 To fieldNames.Length - 1
column = GridView1.Columns.AddField(fieldNames(i))
column.VisibleIndex = i
Next
سؤال بقي انا هنا ضفت اربع اعمده و عندي اربع تيكست بوكس كل تيكست بيه جمله اريد الكود اللي بيضيف الصفوف بالكلمات اللي في التكست بوكس
لم اتعامل معها
فالافضل وضع مشروع بسيط
لنجرب يمكن تضبط
لماذا لا تربطها بالداتاسورس وتضيف البيانات بسهوله؟
لاني اجلب البيانات من النت من خلال facebook api
برضو اضف تلك البيانات الى الداتاتابل وتظهر لك في الجريدفيو
لا توجد مشكلة
جرب هذا
كود :
Public Class Form1
Dim dt As New DataTable
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
GridView1.Columns.Clear()
dt.Columns.Add("ID")
dt.Columns.Add("Name")
dt.Columns.Add("Gender")
GridControl1.DataSource = dt
GridView1.Columns("ID").Caption = "الرقم"
GridView1.Columns("Name").Caption = "الاسم"
GridView1.Columns("Gender").Caption = "النوع"
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
dt.Rows.Add(TextBox1.Text, TextBox2.Text, TextBox3.Text)
End Sub
End Class