[dr.programming]

السلام عليكم
تعلمت منكم زملائى الأعزاء كيف يمكن اضافة Button داخل الجريد
و سؤالى الآن أكرمكم الله
كيف يمكن اضافة مربع نص TextBox داخل الجريد
كيف يمكن اضافة مربع النص ذاته داخل الجريد و يكون هناك امكانية فة الكتابة داخله ؟

[سعود]

(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 


[dr.programming]

(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 


السلام عليكم
بارك الله فيك أخى و أستاذنا الفاضل سعود
الفكرة أن لدي جريد و أريد ان يضاف فى كل سطر بها مربع نص أستطيع الكتابة داخله
و غالبا اذا كان ردى صحيح يصبح الموضوع اضافة عمود بالجريد و بكل row به مربع نص يمكن الكتابة داخله

[سعود]

اذا اضفت عمود من دون تحديد اي شيء افتراضيا يتم اعتباره TextBox و ايضا يمكن الكتابة فيه.
هذا حسب اصدار 2022 اللي عندي.
اذا اردت انواع اخرى فنعم تحتاج تخصيصها وكتابة نوعها بالكود.
هل جربت الكود اللي كتبت بمشاركتي السابقة؟