Dim xbg As Rm
xbg.LobId = cmb_lob.SelectedValue
xbg.Mobile = mobno.Text
xbg.BusinessFax = faxno.Text
xbg.BusinessPhone = phno.Text
xbg.Save()
我有一个组合框,在模块中输入时不是必需的。因此,用户可以在组合cox中选择我想在Oracle数据库中为该记录保存null的空值。我有以下条件但没有得到结果。请你帮忙
if cmb_lob.selectedindex=-1 then
xbg.lob=dbnull
else
xbg.LobId = cmb_lob.SelectedValue
当第一个用户在组合框中选择保存记录然后用户编辑该记录并从组合框中选择空白时,会出现实际问题。现在我必须在数据库中用空值替换combox box的值。
答案 0 :(得分:1)
将它设置为null或VB认为为null - 它将在DB中设置。
答案 1 :(得分:0)
尝试:
if cmb_lob.selectedindex <> -1 then
xbg.LobId = cmb_lob.SelectedValue
else
xbg.LobId = Nothing 'suggested by John Shean (see comments)
因此,如果仅选择该值,则将其分配给字段,否则保持原样(null)
答案 2 :(得分:0)
尝试使用xbg.LobId = Nothing - 作者:John Sheehan