hirotyanさん、こんにちは。

＞aokazumajinさん、こんにちは。
＞
＞シングルラインエディットが空白の時、id=\"001\"として検索すればいいわけですよね？
＞それならまず流れとして
＞１ idが空白か調べる
＞２　空白ならidを\"001\"とする
＞３　dw_1.Retrieve(id)
＞と書けば、goto がいらなくてすっきりしますよ。
＞
＞id=\"001\"の時に１個目のif文は真になっているみたいなので、
＞間違っているならid=\"\"の時の２個目のif文の方ですね。
＞まず試して欲しいのが、シングルラインエディットが空白の時、
＞本当にidが空白になっているか、また\"001\"が代入されているか、
＞チェックすると良いです。
＞ｉｆ文の前に、MessageBox(\"\",id) を入れれば、現在のidの値が見れますよ。
＞
＞文字変数idが空白かどうかをチェックする時、私はしつこいほど
＞チェック入れたりしますよ。
＞　if Trim( id ) = \"\" or IsNull( id ) then
＞ってな文にすると、しつこいでしょ？（笑）
＞idの値をチェックしながら、どうすればif文が思うように動くか
＞考えてみてください。
＞
＞

hirotyanさん回答遅れてすみませんでした。大変参考になり、処理が上手くできました。
本当にありがとうございました。