为什么还是会出错
Private Sub Form_Load()
Dim j As Integer
a2_newsdata.DatabaseName = App.Path & "\data\sbwddb.mdb"
a2_newsdata.RecordSource = "select * from news_info"
If a2_newsdata.Recordset.RecordCount = 0 Then
MsgBox "dfdf"
.....
End If
End Sub运行时为什么会出现这样的错误:
object variable or with block variable not set 其中a2_newsdata是data1控件