想要在 VB 中的 Windows 應用程式的 DataGridView 的每一行中添加空文本框,以接受輸入值以及使用集合的資料系結。
Private Sub CreateTableStyle()
With grdViewer
Dim colDesc As New DataGridViewTextBoxColumn
With colDesc
.DataPropertyName = "Description"
.HeaderText = "Description"
'.Width = 350
.ReadOnly = True
.HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
.DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopLeft
.DefaultCellStyle.WrapMode = DataGridViewTriState.True
.Name = "colDescription"
.Resizable = DataGridViewTriState.True
.AutoSizeMode = DataGridViewAutoSizeColumnMode.None
End With
.Columns.Add(colDesc)
Dim colAssigned As New DataGridViewCheckBoxColumn
With colAssigned
.DataPropertyName = "Assigned"
.HeaderText = "Assigned"
.HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
'.Width = 5
.ReadOnly = True
.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Name = "colAssigned"
.Resizable = DataGridViewTriState.True
.AutoSizeMode = DataGridViewAutoSizeColumnMode.None
End With
.Columns.Add(colAssigned)
Dim emptyTextColumn As New DataGridViewCheckBoxColumn
With emptyTextColumn
.HeaderText = "Enter Description"
.HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
'.Width = 5
.ReadOnly = False
.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Name = "emptyTextColumn"
.Resizable = DataGridViewTriState.True
.AutoSizeMode = DataGridViewAutoSizeColumnMode.None
End With
.Columns.Add(emptyTextColumn)
.DataSource = collectionPM
End With
End Sub
將資料從資料庫系結到此 DataGridView,并且還希望在 DataGridView 的每一行中添加文本框作為單獨的列,以接受每一行的用戶輸入。
uj5u.com熱心網友回復:
您可以簡單地在代碼中添加另一列而不設定其DataPropertyName屬性。無論您是在設定DataSource. 就個人而言,我建議您擺脫該代碼并在設計器中創建列,除非有特定原因您不能這樣做。
轉載請註明出處,本文鏈接:https://www.uj5u.com/ruanti/415377.html
標籤:
