VB.NET memo

ヒアドキュメント

                   Dim param As Hashtable = New Hashtable
                   param("削除フラグ") = "0"
                   Dim Str As String = <text>これは、ヒアドキュメントです。
SELECT
    取引先コード
    ,取引先名
FROM 取引先マスタ
WHERE 
 取引先コード = @ID
 削除フラグ = <%= param("削除フラグ") %>  
;

とかそのままSQL文が書けます。
参照設定で『System.Xml.Linq』を追加すれば使えます。

また、SQLはプレースホルダーを使いましょう。
例）
                   Dim ID As Integer
                   param("削除フラグ") = "0"
                   Dim SqlCommand As New System.Data.OleDb.OleDbCommand
                   SqlCommand.CommandText = &lt;sql&gt;
SELECT
   取引先コード
   ,取引先名
FROM 取引先マスタ
WHERE
 取引先コード = @ID
 削除フラグ = &lt;%= param("削除フラグ") %&gt;  
;
                                            &lt;/sql&gt;
                   SqlCommand.Parameters.Add("@ID", OleDb.OleDbType.Integer)
                   SqlCommand.Parameters("@ID").Value = ID

</text>
                   MsgBox(Str)

Windows7 sendto(送る)

ファイル名を指定して実行から「shell:sendto」

フォルダの実体「C:\Users\ユーザーアカウント\AppData\Roaming\Microsoft\Windows\SendTo」