カンマ区切りを動的にテキストファイルに出力したい

解決


よし  2011-07-10 23:37:54  No: 102983  IP: [192.*.*.*]

初心者のよしです。
よろしくお願いします。
テキストファイルに書き込みをするデータを動的に
したいのですが、3つの項目をカンマ区切りに1レコード
に出力できません。

Dim fileNo As Integer
Dim strData As String
 
fileNo = FreeFile

Open "abc.txt" For Append As #fileNo
 
Write #fileNo, "a","b","c"

abc.txtファイルを開いて確認すると
"a","b","c"
カンマ区切りになります。

Write #fileNo, "a","b","c"   <- 部分を動的にしたい

このようにした場合、
strData = "a" & """,""" & "b" & """,""" & "c"
Write #fileNo,strData

確認すると

"a"",""b"",""c"  このようになり

"a","b","c"  なりません

どのようにすれば、
"a","b","c"  このようになるのでしょうか?

編集 削除
よし  2011-07-11 10:37:11  No: 102984  IP: [192.*.*.*]

自己解決しました。

strData = Chr(&H22) & "a" & Chr(&H22) & "," _
        & Chr(&H22) & "b" & Chr(&H22) & "," _
        & Chr(&H22) & "c" & Chr(&H22) 

これでうまくいけました。

編集 削除