لإضافة سطر جديد إلى DataGridView باستخدام DataTable في Visual Basic .NET، يمكنك اتباع الخطوات التالية. في هذا المثال، سنستخدم 5 TextBoxات لإدخال البيانات، وزر لإضافة السطر إلى DataGridView.
إنشاء واجهة المستخدم:
أضف 5 TextBoxات إلى النموذج الخاص بك، وقم بتسميتها TextBox1، TextBox2، TextBox3، TextBox4، وTextBox5.
أضف DataGridView إلى النموذج الخاص بك، وقم بتسميته DataGridView1.
أضف زر إلى النموذج الخاص بك، وقم بتسميته Button1.
إعداد DataTable وربطه بـ DataGridView:
في ملف الكود الخاص بالنموذج، قم بإضافة الكود التالي لإعداد DataTable وربطه بـ DataGridView عند تحميل النموذج.
PHP كود :
Public Class Form1
Private dataTable As New DataTable()
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' إعداد الأعمدة في DataTable
dataTable.Columns.Add("Column1", GetType(String))
dataTable.Columns.Add("Column2", GetType(String))
dataTable.Columns.Add("Column3", GetType(String))
dataTable.Columns.Add("Column4", GetType(String))
dataTable.Columns.Add("Column5", GetType(String))
' ربط DataTable بـ DataGridView
DataGridView1.DataSource = dataTable
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' إضافة صف جديد إلى DataTable
Dim newRow As DataRow = dataTable.NewRow()
newRow("Column1") = TextBox1.Text
newRow("Column2") = TextBox2.Text
newRow("Column3") = TextBox3.Text
newRow("Column4") = TextBox4.Text
newRow("Column5") = TextBox5.Text
' إضافة الصف إلى DataTable
dataTable.Rows.Add(newRow)
' تفريغ TextBoxات بعد إضافة الصف
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
TextBox5.Clear()
End Sub
End Class
في هذا الكود:
عند تحميل النموذج، يتم إعداد DataTable وإضافة الأعمدة إليه، ثم ربطه بـ DataGridView.
عند النقر على الزر Button1، يتم إنشاء صف جديد في DataTable باستخدام البيانات المدخلة في TextBoxات، ثم إضافته إلى DataTable. بعد ذلك، يتم تفريغ محتويات TextBoxات.
تأكد من أن TextBoxات، وDataGridView، والزر قد تم تسميتهم بشكل صحيح في النموذج الخاص بك كما هو مذكور في الكود. هذا سيضمن إضافة سطر جديد إلى DataGridView عند النقر على الزر.