错误提示不说得很清楚么，类型不对。
创新互联公司2013年成立，先为如东等服务建站，如东等地企业，进行企业商务咨询服务。为如东企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
你操作有数据的记录时，有日期的那个字段它是有数据的，直接可以取出date型数据，而如果为空的话，那就不是date型数据了，它就是一个null了，是空的，null和date是两回事。所以你在写程序的时候，要检查一下，字段是不是null,如果是null那就不能往外读数，不是null，那就直接往外读。
if myreader.getstring(2) "" then
else
....
end if
取反 这样可以的 我一直就这样写
1、vb6判断数据库字段为空值的方法是：if isnull(x1) then ...
2、vb6判断字符串是空串的方法是：if x2="" then ...
3、强调一下x1在vb6下必须是varint变量，才能装入数据库的空值NULL。
VB读取数据库中的空值是会出错,所以,应该提前判断一下:
if isnull(rs.fields(2)) then
m="空值"
else
m=rs.fields(2)
end if
最简单的办法是：
trim(rs.fields(2) "")
Dim R08 As Nullable(Of Double)
If InStr(1, Mid(fileLines(2), 1, InStr(1, fileLines(2), ")")), st(p)) 0 Then
R08 = 0
Else
R08 = Nothing
End If
