サブソニックでnull値を保存する方法

Question

Dim xbg As Rm 

xbg.LobId = cmb_lob.SelectedValue 
xbg.Mobile = mobno.Text 
xbg.BusinessFax = faxno.Text 
xbg.BusinessPhone = phno.Text 
xbg.Save() 

私はコンボボックスを持っていますが、これはモジュールに入力中は必須ではありません。したがって、ユーザーは、そのレコードのOracle Databaseにnullを保存するコンボ・コモックスの空白値を選択できます。私は次の条件で悲しみましたが、結果を得ることができません。あなたは、まず、ユーザは、ユーザの編集コンボボックスで選択して、そのレコードをレコードを保存し、コンボボックスから空白を選択したときに

if cmb_lob.selectedindex=-1 then 
    xbg.lob=dbnull 
else 
    xbg.LobId = cmb_lob.SelectedValue 

実際の問題が生じ助けてくださいするように要求されています。今私はデータベースでnullとcomboxボックスの値を置き換える必要があります。

Answer 1

試してみてください。

if cmb_lob.selectedindex <> -1 then 
    xbg.LobId = cmb_lob.SelectedValue 
else 
    xbg.LobId = Nothing 'suggested by John Shean (see comments) 

値が選択されている場合にのみ、それは（ヌル）であるとして、それを残して、他のフィールドに割り当てるようにするため

Answer 2

はnullに設定するか、nullを考えて何でもVB - それをそのようにDBに設定されます。代わりにxbg.LobId =何も

Answer 3

てみてください - 最初のユーザーがそのレコードその後、コンボボックスで選択したユーザの編集をレコードを保存し、コンボボックスから空白を選択したときに ジョン・シーハン