|
#2
snrtjat2013-11-06 08:44
|
我Access2003中的数据显示如下图:
只有本站会员才能查看附件，请 登录
但我在datagrid中显示时,就自动转换成了小数,不知这是怎么回事?
只有本站会员才能查看附件，请 登录
求高手指点!
程序代码：private sub form_load()
'打开数据库AllZone
Adodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\mdb.mdb;Persist Security Info=False"
= adCmdText
Adodc2.RecordSource = "select * from AllZone"
Set DataGrid2.DataSource = Adodc2
'设置DataGrid2的列宽
DataGrid2.Columns(0).Width = 300
DataGrid2.Columns(1).Width = 1000
DataGrid2.Columns(2).Width = 800
DataGrid2.Columns(3).Width = 620
DataGrid2.Columns(4).Width = 540
DataGrid2.Columns(5).Width = 560
DataGrid2.Columns(6).Width = 1100
DataGrid2.Columns(7).Width = 950
DataGrid2.Columns(8).Width = 2300
End Sub
问题二:'打开数据库AllZone
Adodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\mdb.mdb;Persist Security Info=False"
= adCmdText
Adodc2.RecordSource = "select * from AllZone"
Set DataGrid2.DataSource = Adodc2
'设置DataGrid2的列宽
DataGrid2.Columns(0).Width = 300
DataGrid2.Columns(1).Width = 1000
DataGrid2.Columns(2).Width = 800
DataGrid2.Columns(3).Width = 620
DataGrid2.Columns(4).Width = 540
DataGrid2.Columns(5).Width = 560
DataGrid2.Columns(6).Width = 1100
DataGrid2.Columns(7).Width = 950
DataGrid2.Columns(8).Width = 2300
End Sub
如何在datagrid1中只显示Group为"S1"的所有数据,不知怎么实现?
效果如下:
只有本站会员才能查看附件，请 登录
