vb数据库开发中 字段是否设置为null的问题
我们现在的一个系统,其中涉及到很多表,每个表都有很多字段
在vb中,使用adobc连接
先建立connection
而后 进行rs.open
获得rs记录集
而后想将rs中的内容显示在文本框中txt中,用txtName.text=rs!name
但是遇到name为<NUll>时,就会出错
现在的解决办法是if isnull(rs!name) then
txtname.text=""
else
txtname.text=rs!name
end if
但是在涉及到的表比较多的时候,就比较麻烦,不知是否有更好的办法
问题点数:10、回复次数:5Top
1 楼icedut(冰-装修准备中)回复于 2005-06-01 13:54:39 得分 2
我一般这么写
txtname.text=iif( isnull(rs!name) ,"",rs!name)
Top
2 楼hippopotamus(河马)回复于 2005-06-01 14:01:46 得分 2
呵呵
我也一样这样写
另外 楼主没有必要说的这么详细
大家都会明白的 嘿嘿Top
3 楼icedut(冰-装修准备中)回复于 2005-06-01 14:08:01 得分 2
修改表结构--加默认值Top
4 楼Athickhead(穿着三角裤到处跑不叫裸奔)回复于 2005-06-01 14:10:29 得分 2
做个函数:
Public Function myTrim(ByVal Value As Variant) As Variant
If IsNull(Value) Then
myTrim = ""
Else
myTrim = Trim(Value)
End If
End Function
Top
5 楼hr88rong(阿榕(http://www.caixiong.com/?69583361.htm))回复于 2005-06-01 18:07:29 得分 2
在txtName.text=rs!name后面添加 & "",即txtName.text=rs!name & ""应该就可以了!:)Top




