请教datagrid控件如何控制显示格式？

Question

我用一个datagrid控件来显示一个记录集，如下的代码:
dim db as new adodb.connection
dim rs as new adodb.recordset
dim strsql as stringdb.open "provider=microsoft.jet.oledb.4.0;data source=" & app.path &  _
"\book.mdb"
strsql="select * from book"
rs.cursorlocation=aduseclient
rs.open strsql,db,adopenkeyset,adlockoptimistic
set datagrid1.datasource=rs这样显示出来的表格总是有左右的滚动条，我想知道如何控制每个字段的宽度，从而让界面更加美观一些，请各位不吝赐教！

Answer 1

右键单击datagrid，——>属性

Answer 2

调出datagrid属性，然后按自己的要求设制即可！

Answer 3

可是recordset里面的记录是查询出来的呀，并不能确定里面有几个字段

Answer 4

字段的个数
int_no=rs.Fields.Count

Answer 5

每列的大小可以分别定义，但，每行只能是设定一个值
DataGrid1.Columns(0).Width = 300 '第一列的宽度
DataGrid1.Columns(1).Width = 30000
DataGrid1.Columns(2).Width = 40000
    .
    .
    .
DataGrid1.Columns(n).Width = 40000
DataGrid1.RowHeight = 400