Question

vb中的datagrid 控件如何增加列数？

Answer 1

列数是自动的，就是记录集的字段数
'Ctrl+t找Microsoft DataGrid Control....
'菜单"工程"->"引用" 找 Microsoft ActiveX Data Object....

Dim cn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim SqlStr As String
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database Password=111"
SqlStr = "Select * From 某个表"
rst.CursorLocation = adUseClient
rst.Open SqlStr, cn, adOpenDynamic, adLockOptimistic, adCmdText '打开记录集
Set DataGrid1.DataSource = rst '给DataGrid修改数据源

Answer 2

这个要增加记录集的字段才行。
如果你要增加记录集的字段可以用这个代码
rs.Fields.Append("字段名字",字段类型)

Answer 3

datagrid1.VisibleRows
返回一个整数，其范围从 0 到 DataGrid 控件的 Rows 属性所设置的行数。VisibleRows 属性包含全部或部分可见的 DataGrid 控件行

Answer 4

都说的太复杂了，只需要在控件那点右键，选择追加就增加了。