如果是连接的数据库表为空记录的话，
这样写行么？如下：

If Rst.RecordCount > 0 Then
Text1.Text = Rst.Fields("姓名").Value
Text2.Text = Rst.Fields("单位名称").Value
。。。
。。。
Text14.Text = Rst.Fields("邮政编码").Value
Text15.Text = Rst.Fields("其他").Value
Text17.Text = Rst.AbsolutePosition
Text16.Text = Rst.RecordCount
Else
Text1.Text = ""
Text2.Text = ""
。。。
。。。
Text17.Text = ""
Text16.Text = ""
End If

执行后，虽然可以打开空记录表，但进行添加时，完毕后，却显示“无效使用NULL”失败！！！

http://bbs.bc-cn.net/viewthread.php?tid=99787

大哥..你是当别人说的不存在是吧?....

....你上次问过了...我说了N次..说用isNull函数来判断Field是否为空...
如果你觉得..我说的不是什么的话...那对不起..我帮不了你..

这样试试
If Rst.recordset is nothing Then
Text1.Text = Rst.Fields("姓名").Value
Text2.Text = Rst.Fields("单位名称").Value
。。。
。。。
Text14.Text = Rst.Fields("邮政编码").Value
Text15.Text = Rst.Fields("其他").Value
Text17.Text = Rst.AbsolutePosition
Text16.Text = Rst.RecordCount
Else
Text1.Text = ""
Text2.Text = ""
。。。
。。。
Text17.Text = ""
Text16.Text = ""
End If