把If readrecordset.EOF Then
改为:If readrecordset.EOF and readrecordset.BOF Then
改为:If readrecordset.EOF and readrecordset.BOF Then
解决方案 »
- 导出excel时,如何设置所有单元格全为文本格式呢?
- VB如何得到从webservice传递过来的dataset并与控件绑定
- 关于frame控件数组的问题,新添的页面覆盖了别的页面?
- 关于文件夹的加密,100分
- 如何实现网页文件打包(在线等待,百分答谢)
- 求购一套医院管理系统的源代码,请报价
- 深圳-科技园-大冲社区531号6楼三间两厅其中一间转租
- 用Vb如何写一个服务器端的com,可给300分
- datagrid----------
- 哪位能告诉我如何在VB程序中实现关闭计算机?
- 谁知道win2000 server的序列号,谢谢了
- ???大侠请指点:我在WIN98下双机用MODEM互连时,有时在检测用户名和密码后提示输入用户名,密码,域名,在WIN98下就没有域,请问是怎么回事?????????
记录集打开时加入
先赋值
total3=0
if readrecordset.Fields(0)<>"" then
total3=readrecordset.Fields(0)
end if
不就行了?
'如果打开的记录集不为空则
if not (readrecordset.bof or readrecordset.eof ) then
total3=readrecordset.Fields(0).value
else
total3=0
end if
readrecordset.close
set readrecordset=nothing