Dim con As New ADODB.Connection
Dim rsAs New ADODB.Recordset
Private Sub Form_Load()
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\text.mdb;Persist Security Info=False"
rs.Open "select * from usmy", con, adOpenKeyset
'打开记录集
Set MSFlexGrid1.DataSource = rs
rs.Close
con.Close
End Sub
在执行到set mshflexgrid1.datasource = rs 时报“对象变量或 With 块变量没有设置（错误 91）”
哪位高手帮我看看怎么解决，急！求教！
在工程中已经添加了Adodc1 和 MSFlexGrid1 控件
查阅资料后是引用错了部件，要添加MS ActiveX Data Obiect 2.5 Library
但无法引用，提示错误：不可注册为ActiveX部件。
不知为何原因！请各位高手帮帮忙！
