'平均分每行
Dim i
For i = 1 To DataGrid1.Columns.Count
DataGrid1.Columns(i).Width = DataGrid1.Width / DataGrid1.Columns.Count
Next
Dim i
For i = 1 To DataGrid1.Columns.Count
DataGrid1.Columns(i).Width = DataGrid1.Width / DataGrid1.Columns.Count
Next
grid的列就是你绑定的表上的字段了。你可以编辑每一个列的名称。
我意思是指定datagrid显示的行列数,比如,我要他只显示10行,5列,多余的不显示
Dim x As Integer
Dim y As Integer
Dim i As Integer
x = 1'你想要的列数
For i = x To DataGrid1.Columns.Count - 1
DataGrid1.Columns(i).Visible = False
Next
y = 5'你相要的行数
DataGrid1.Height = DataGrid1.RowHeight * (y + 1) + 50
End Sub
为什么列数要这样拐弯抹角呢?
有没有更简单的方法?