为什么DATAGRID棒定数据库后无法显示记录?
我在FORM中增加了2个控件,一个是datagrid一个是mshflexgrid
代码如下:
Private Sub Form_Load()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str As String
str = "select id,书id,数量,进货价格,进货日期 from 进货"
cn.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & App.Path & "/book.mdb"
cn.Open
rs.Open str, cn, 1, 1
Set DataGrid1.DataSource = rs
Set MSHF1.DataSource = rs
End Sub
为什么mshf1中能正常显示记录,而datagrid中无法显示记录,感觉好象没棒定一样。请高手指点!谢谢