Dim Irow0 As String() = {"I24", "", "K24", "", "A24", ""}
Dim Irow1 As String() = {"I23", "", "K24+K23", "", "A23", ""}
Dim Irow2 As String() = {"I22", "", "K24+K23+K22", "", "A22", ""}
Dim Irow3 As String() = {"I21", "", "K24+K23+K22+K21/2", "", "A21", ""}
With Me.IDataGridView.Rows
.Add(Irow0)
.Add(Irow1)
.Add(Irow2)
.Add(Irow3)
End With
像这样,可以把这代码放到Form1_Load里。
在运行时实现,而不是在设计时实现。