函数“ExecuteSQL”并非在所有代码路径上都返回值。当使用结果时，可能会在运行时发生空引用异常。

我用的是VB.net2005编程的

总是出现这个问题，

代码如下：

请各位大侠帮忙解决！谢谢了！

Public Function ExecuteSQL(ByVal SQL As String, ByVal table As String)
Try
'建立ADODataSetCommand对象
'数据库查询函数
Dim constr As String
constr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
constr = constr & Application.StartupPath() & "/sj.mdb"
ADOcmd = New OleDbDataAdapter(SQL, constr)
'建立ADODataSetCommand对象
ds.Clear()
ds.Tables.Clear() '清除数据集中的所有表
ADOcmd.Fill(ds, table) '取得表单
mytable = ds.Tables.Item(0) '取得名为table的表
rownumber = 0 '设置为第一行
myrow = mytable.Rows.Item(rownumber)
'取得第一行数据
Catch
MsgBox(Err.Description)
End Try
End Function

缺少声明，加一个BOOBLE就可以了

没遇到

为什么ds没有定义语句？