テキストボックスとデータベース

はじめまして。
 ＶＢ5.5からＶＢ2012にプログラムを移行しています。
 質問は以下の通りです。

まず、textboxにデータベースから読んだ文字列を表示しています。
ＮＵＬＬの場合には「””」を代入しています。

 　If IsDBNull(【データベースの項目】.ToString) = False Then
    　 textbox1.Text = 【データベースの項目】.ToString
　Else
    　 textbox1.Text = ""
　End If

この時点で、textboxの表示上問題はありません。
 次にこのtextbox1.textを使ってデータベースをアップデートします。

 　"update テーブル set 列名 = '" + textbox1.Text + "' where  条件"

そうすると、アップデートされたデータが、読み込んだデータがＮＵＬＬだった時には
４０文字の空白になっています。
 文字が入っていた場合でも、「文字＋空白＝４０文字」になっています。
データベースは Microsoft Sql Server で、この項目の「長さ」が「４０」になっています。

 読み込む時点でＮＵＬＬだったら、アップデート後もＮＵＬLにしたいです。
せめて０文字の空白「””」になっていてくれたらよいのですが、
なぜか４０文字になってしまいます。

どうしたらよいのでしょうか？お知恵をお貸しください。 

>データベースは Microsoft Sql Server で、この項目の「長さ」が「４０」になっています。
この項目が固定長になっているのでは？
固定長の場合は不足分をスペースか何かで埋めるような気が。

>読み込む時点でＮＵＬＬだったら、アップデート後もＮＵＬLにしたいです。
Nullで更新するSQL文は次のようになります。

update テーブル set 列名 = Null where  条件

ですから、TextBoxの内容が空文字(長さ0の文字列)の場合、Nullで更新、そうでない場合入力されている値で更新するプログラムは次のようになります。

If Len(TextBox1.Text) = 0 Then

    Dim sql As String = "update テーブル set 列名 = Null where  条件"

    'SQL実行 

Else

    Dim sql As String = "update テーブル set 列名 = '" & TextBox1.Text & "' where  条件"

    'SQL実行 

End If

なお、Nullかどうか判断するところでHARUさんは、

If IsDBNull(【データベースの項目】.ToString) = False Then

と書かれていますが、これだと、 ToStringの戻り値がNullかどうか検査していることになりますから、
次のように書くのが正しいと思います。

If IsDBNull(【データベースの項目】) = False Then

もちろん【データベースの項目】の型がNullを保持できていることが前提です。

できましたら実際に使っているプログラムをそのまま貼り付けていただいた方が正確な会話ができます。

スペース含めて40文字にされてしまう件は、もちださんの言うようにcharやncharなどを使って固定長で定義しているのではないかと思います。
だとすると、Nullの話とは別にどこかでTrimしたほうがいいかも知れません。

なお、例であげたSQLは説明を簡単にするために不具合を承知でシンプルなまま載せています。
この例をそのまま使うとTextBoxに ' を入力された場合などエラーになるばかりか、データベースに不正アクセスされて情報を引き出されるかもしれません。またパフォーマンス上もあまりよくありません。解決策として実際のプログラムではパラメーター化クエリを使用されることをお奨めします。
ごく少人数が使う致命的でないシステムならこのままリリースでも許される…かもしれませんが…。

お二方とも、ありがとうございました！

おっしゃる通り、固定長（char)だった為、空白で埋まっていたようです。
ちなみにオラクルとＳＱＬサーバーではＮＵＬＬの扱いが違うんですね、
ＶＢ５．５の時はオラクルだったので上手くいっていたようでした。

ＮＵＬＬの件もわかりやすく説明して頂きありがとうございました。

解決できてうれしいです！