(06-09-22, 06:17 AM)dr.programming كتب : [ -> ]السلام عليكم
تعلمت منكم زملائى الأعزاء كيف يمكن اضافة Button داخل الجريد
و سؤالى الآن أكرمكم الله
كيف يمكن اضافة مربع نص TextBox داخل الجريد
كيف يمكن اضافة مربع النص ذاته داخل الجريد و يكون هناك امكانية فة الكتابة داخله ؟
Public Class Form1
Private Function dgvcount() As Integer
Return dgv.ColumnCount
End Function
Private Sub btnAdd_Click(sender As System.Object, e As System.EventArgs) Handles btnAdd.Click
If dgvcount() > 0 Then
Dim i As Integer = Val(txtindex.Text)
Dim tn As String = txtname.Text
dgv.Columns(i).HeaderText = tn
dgv.Columns(i).ReadOnly = False
Else
MsgBox("Add One Column By Clicking on button with text'+'")
End If
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
dgv.ColumnCount += 1
End Sub
End Class
(06-09-22, 08:52 AM)سعود كتب : [ -> ](06-09-22, 06:17 AM)dr.programming كتب : [ -> ]السلام عليكم
تعلمت منكم زملائى الأعزاء كيف يمكن اضافة Button داخل الجريد
و سؤالى الآن أكرمكم الله
كيف يمكن اضافة مربع نص TextBox داخل الجريد
كيف يمكن اضافة مربع النص ذاته داخل الجريد و يكون هناك امكانية فة الكتابة داخله ؟
و عليكم السلام
فيه عمود وفيه حقل
هل العمود موجود وتريد اضافة حقل؟
هذا مثال بسيطPHP كود :
Public Class Form1
Private Function dgvcount() As Integer
Return dgv.ColumnCount
End Function
Private Sub btnAdd_Click(sender As System.Object, e As System.EventArgs) Handles btnAdd.Click
If dgvcount() > 0 Then
Dim i As Integer = Val(txtindex.Text)
Dim tn As String = txtname.Text
dgv.Columns(i).HeaderText = tn
dgv.Columns(i).ReadOnly = False
Else
MsgBox("Add One Column By Clicking on button with text'+'")
End If
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
dgv.ColumnCount += 1
End Sub
End Class