请教Recordset方法打开access 表记录的问题

jxcaomin

请问用以下方式打开记录时为什么只要查询的表里有一个字段内容为空时，引用时就会出错（无效使用 Null）并停止运行后面的代码，用什么方法可以解决啊？　请帮帮我吧。。。

Dim rs As ADODB.Recordset

openrecord "select * from tablename", rs

msgbox rs(0)

Public Function openrecord(str1 As String, record As ADODB.Recordset)
   Set record = New ADODB.Recordset
  ' record.Open str1, CurrentProject.Connection, adOpenKeyset, adLockReadOnly
End Function

[此贴子已经被作者于2006-8-18 12:05:50编辑过]