|
 | 作者: blindeaf [blindeaf]
 论坛用户 |
登录 |
| 我要在文本框中显示数据库中的内容，我用DAO读取数据库里的内容时，当数据库里的内容为空时会提示： 实时错误'94' 无效读取Null 应该怎么办啊？ 部分代码如下： Dim db As Database, rs As Recordset Set db = OpenDatabase("d:\db1.mdb") Set rs = db.OpenRecordset("用户") Private Sub Command2_Click() If num = 3 Then Beep Exit Sub Else num = num + 4 Text1.Text = rs(num) Text2.Text = rs(num + 1) Text3.Text = rs(num + 2) End If 当遇到一个记录为空时就会出错，郁闷哪 [此贴被 海鬼(blindeaf) 在 05月16日20时28分 编辑过] |
| 地主 发表时间: 04-05-16 20:24 |
 | 回复: code [code]  论坛用户 |
登录 |
|
你的错误判断没有做好,应该有条语句来判断数据库是否为空的情况! 另外最好把DAO的语法再熟悉,DAO是个不错的数据库的接口! |
| B1层 发表时间: 04-05-16 20:30 |
| 回复: blindeaf [blindeaf] 论坛用户 |
登录 |
|
判断数据库是不是为空我加了几行代码 If rs(num + 2) = Null Then Text3.Text = "" Else Text3.Text = rs(num + 2) End If 还是会出错。 |
| B2层 发表时间: 04-05-16 20:36 |
|
20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写：NetDemon
粤ICP备05087286号
论坛: 编程破解
标题: VB编程用DAO读取数据库时发生错误。急，帮帮我