从编程中设置VB Net中的特定数量数据杂志列的宽度

Question

我有一个datagridview，其中具有许多可以通过文本框预设的列。前四列具有确定的宽度。我正在尝试设置所有剩余列的宽度。这是我的代码：

  dgv1.ColumnCount = CInt(Val(Form32.tbNbBox.Text) + 4)
  dgv1.Columns(0).Width = 100
  dgv1.Columns(1).Width = 70
  dgv1.Columns(2).Width = 70
  dgv1.Columns(3).Width = 50
  For i As Integer = 4 To CInt(Val(Form32.tbNbBox.Text))
     Dim c(i) As DataGridViewColumn
     For Each c(i) In dgv1.Columns
         c(i).Width = 40
     Next

因此，所有列的宽度都相同(40(。预先感谢您的任何帮助。

Answer 1

我认为您的使其比应该更复杂。

  For i As Integer = 4 To CInt(Val(Form32.tbNbBox.Text)) -1
     dgv1.Columns(i).Width = 40
  Next