VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2004/08/25(Wed) 13:33
投稿者LESIA
Eメール
URL
タイトルRe^3: CSV出力について

> すいません。説明不足でした。
> 変数AとBにダブルコーテーションまたはLFコードが含まれる場合にのみ、項目をダブルコーテーションでくくり
> たいのですが。
> A = "AAA"
> B = 5
> C = "BB""CC"
>
> Write #1, A, B, C
>
> 求める出力結果
> AAA , 5 , "BB""CC"

If (InStr(A, """") > 0) Or (InStr(A, vbLf) > 0) Then
    A = """" & A & """"
End If

If (InStr(B, """") > 0) Or (InStr(B, vbLf) > 0) Then
    B = """" & B & """"
End If

If (InStr(C, """") > 0) Or (InStr(C, vbLf) > 0) Then
    C = """" & C & """"
End If

Print #1, A, B, C


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -