关于记录值为空的问题，请大家帮忙！谢谢！！

[wangqiu]

问题如下

dim a as new adodb.connection
dim b as new adodb.recordset
con.Open "DSN=qianggege;uid=wq;pwd=wq;"
rs.CursorLocation = adUseClient
rs.Open "qianggege", con, adOpenKeyset, adLockOptimistic, adCmdTable
Text1.Text = rs("code")
Text2.Text = rs("name")
当我记录name为空的时候就会出现错误，我想用if then else end if 的语句排除这个毛病，但If rs("name") = Null Then
Text32.Text = " "
Else
Text2.Text = rs("name")
End If
是不对的那么那个当记录的name为空的时候我应该用什么代替

[zqfleaf]

试试
If isnull(rs("name")) Then
Text32.Text = " "
Else
Text2.Text = rs("name")
End If

[lihonggen0]

If not isnull(rs("name")) Then
Text2.Text = rs("name")
else
Text2.Text = ""
endif

[道素]

If isnull(rs("name")) Then
Text32.Text = " "
Else
Text2.Text = rs("name")
End If

[xayzmb]

这样试试:
Text2.Text = rs("name") & ""

[WangPengAn]

看這樣行不:
Text2.Text =iif(isnull(rs("name")),"",rs("name"))

[iiboy]

Text1.Text = rs("code")
Text2.Text = rs("name")
程序应该会在上面的一行中出错,我认为应当这样写:
Text2.Text=IIf(IsNull(rs("name")),"",rs("name"))

[of123]

Text2.Text = rs("name") & "" '强制转换成字符串，Null时为空串

[lxcc]

Text1.Text = "" & rs("code")
Text2.Text = "" & rs("name")

[wangqiu]

感谢大家！！谢谢！！三种方法都好用，谢谢大家！！揭贴了！！

[cbzdream]

Text2.Text = rs("name") & ""

[wangqiu]

怎么我揭贴以后大家都是0分呀，我可给分了