vbネット内の特定の数のdatagridview列の幅をプログラムで設定します。

Question

テキストボックスを使用してプリセットできる列数を持つdatagridviewがあります。最初の4列は、決められた幅を持ちます。残りのすべての列の幅を設定しようとしています。このコードは、

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