vb.net DataGridView设置单元格最后一列宽度设置为50,不改变标题的行高,每行后面注释
时间: 2024-03-27 07:36:15 浏览: 60
您可以使用 DataGridView 的 Columns 属性来获取列的集合,并使用 Count 属性获取列数。从而获取最后一列的索引。在此基础上,您可以使用以下代码设置最后一列的宽度为50,并在每行的最后一列添加注释,同时保持标题行的高度不变:
```
' 获取最后一列的索引
Dim lastColumnIndex As Integer = DataGridView1.Columns.Count - 1
' 设置最后一列的宽度为50
DataGridView1.Columns(lastColumnIndex).Width = 50
' 在每行的最后一列添加注释
For Each row As DataGridViewRow In DataGridView1.Rows
row.Cells(lastColumnIndex).Value = "注释"
' 获取当前行的标题单元格
Dim headerCell As DataGridViewHeaderCell = row.HeaderCell
' 如果是标题行,则将高度设置为自适应
If headerCell IsNot Nothing Then
headerCell.Style.Alignment = DataGridViewContentAlignment.MiddleLeft
headerCell.Style.WrapMode = DataGridViewTriState.True
Dim preferredHeight As Integer = headerCell.GetPreferredSize(DataGridView1.RowHeadersWidth, DataGridView1.RowsDefaultCellStyle.Font, DataGridView1.AutoSizeColumnsMode).Height
If DataGridView1.RowTemplate.Height < preferredHeight Then
DataGridView1.RowTemplate.Height = preferredHeight
End If
End If
Next
```
这段代码假设您的 DataGridView 的名称为 DataGridView1。您可以根据需要进行修改和调整。
阅读全文