初めて投稿させて頂きます。VB2010を使い始めて１ヶ月程度の者です。こちらのコードを使わせていただきCSV保存を行ったのですが、CSV読込時に""が表示されてしまい９時間程格闘したのですが全くお手上げになってしまいました。Replace("""", """""")の部分ではないかと思ったのですが全然違うみたいで困ってしまいました。恐縮ですがアドバイス等頂ければと思っております。どうぞよろしくお願い致します。

保存時に、"" を付加して保存したらなら、読み込み表示時にそれが障害となるなら
削除すればいいだけの事です。
cmDat(i) = cmDat(i).Trim(Chr(34))
但し、すべてのデータに対して実行する事になり、処理時間がかかる可能性があります。
http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no4

又、ADO.NET 等で読み込み表示する等すれば取り除く必要はありません。
http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no3

それより、http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=17578　この投稿方ですよね。
でなければ、http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no4　を見ている
はずですが。

> 保存時に、"" を付加して保存したらなら、読み込み表示時にそれが障害となるなら
> 削除すればいいだけの事です。
> cmDat(i) = cmDat(i).Trim(Chr(34))
> 但し、すべてのデータに対して実行する事になり、処理時間がかかる可能性があります。
> http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no4
>
> 又、ADO.NET 等で読み込み表示する等すれば取り除く必要はありません。
> http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no3
>
> それより、http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=17578　この投稿方ですよね。
> でなければ、http://www.hanatyan.sakura.ne.jp/vb2005/vb2005datagridview01.htm#no4　を見ている
> はずですが。

申し訳ございません。至らないとはいえ訳が分からなくなってしまいました。お騒がせしてすみませんでした。
アドバイスありがとうございます。頑張ってみます。ありがとうございました。

> アドバイスありがとうございます。頑張ってみます。ありがとうございました。

別に頑張らなくてもあのコードをそのまま使えば済む事ではないのですか。
試しもしないで、又違う掲示板に質問されるおつもりでしょうか？

> > アドバイスありがとうございます。頑張ってみます。ありがとうございました。
>
> 別に頑張らなくてもあのコードをそのまま使えば済む事ではないのですか。
> 試しもしないで、又違う掲示板に質問されるおつもりでしょうか？

いえ、マナーも知らずとんだことをしてしまいました。わからなかったとはいえお許しください。実はデータグリットビューにはODBファイル読込編集、CSVファイル読込編集書込、その際にテキストBoxにて検索をかけて、３つのレコードを表示しプレビュー、印刷、保存、（息子が研究職なもので役に立てればいいなと思い作り始めた次第です。）今回はCSVへの書込時、テキストBox検索ができなくなりエラーしてしまい途方にくれていたところでした。ADOを使ってやってみます。他の掲示板には絶対に投稿しません。何も知らずお騒がせして申し訳ございませんでした。

> > > アドバイスありがとうございます。頑張ってみます。ありがとうございました。
> >
> > 別に頑張らなくてもあのコードをそのまま使えば済む事ではないのですか。
> > 試しもしないで、又違う掲示板に質問されるおつもりでしょうか？
>
> いえ、マナーも知らずとんだことをしてしまいました。わからなかったとはいえお許しください。実はデータグリットビューにはODBファイル読込編集、CSVファイル読込編集書込、その際にテキストBoxにて検索をかけて、３つのレコードを表示しプレビュー、印刷、保存、（息子が研究職なもので役に立てればいいなと思い作り始めた次第です。）今回はCSVへの書込時、テキストBox検索ができなくなりエラーしてしまい途方にくれていたところでした。ADOを使ってやってみます。他の掲示板には絶対に投稿しません。何も知らずお騒がせして申し訳ございませんでした。


たびたびすみません。ADOは使わず、cmDat(i) = cmDat(i).Trim(Chr(34))を使用してみました。
CSV読込時に""が付加されずに読込成功しました。がやはりテキストBox検索のところでエラーして
しまいました。素人考えで申し訳ないのですが、CSV自体に""が付加されている為ではないかと
色々試しているところです。お騒がせして申し訳ありません。
（CSV自体に元本CSVファイルをコピー、貼付を行いCSV,ODBを読込むと、テキストBox検索が
可能になります。）

> CSV読込時に""が付加されずに読込成功しました。がやはりテキストBox検索のところでエラーして
> しまいました。素人考えで申し訳ないのですが、CSV自体に""が付加されている為ではないかと

どのように表示されていようと、表示の方法と検索方法は関係ないので、元々検索の仕方が悪いだけでは。
(検索するデーターが変われば検索できない、エラーがでるようでは。)

何を、どのように、どのような方法で、実行して、どのようなエラーがでたのかを書かないと
これを見ている人には何も伝わりません。テキストBox検索しかり。
>CSV自体に""が付加されている為ではないかと
取り除いて表示させたのでは。？

下記の[掲示板ご利用に際し]を読んで質問内容を書いて下さい。
http://www.hanatyan.sakura.ne.jp/hazimeni.htm#keijiban

> どのように表示されていようと、表示の方法と検索方法は関係ないので、元々検索の仕方が悪いだけでは。
> (検索するデーターが変われば検索できない、エラーがでるようでは。)
>
> 何を、どのように、どのような方法で、実行して、どのようなエラーがでたのかを書かないと
> これを見ている人には何も伝わりません。テキストBox検索しかり。
> >CSV自体に""が付加されている為ではないかと
> 取り除いて表示させたのでは。？

分かりにくい表現で申し訳ありませんでした。ご迷惑おかけします。
フィールド６項目、レコード１００行のサンプルＣＳＶファイルをドキュメントに置き、Button1でＣＳＶ読み込みを行いDataGridView1に表示させ、TextBox1に名前を入力しButton2でＣＳＶファイルからTextBox2,3,4
に文字を表示させてました。ＣＳＶ保存をButton3で行い再びＣＳＶを読み込んで同じようにButton2で
検索をかけると全く反応がない状態になってしまいました。(DataGridView1とTextBox1は連動してます。)
ドキュメントのＣＳＶファイルですが、あらかじめ予備にとっておいた元本ＣＳＶファイルをコピーし
そのドキュメントのＣＳＶファイルにペーストし再び読込みを行いButton2検索で検索をかけると、
TextBox2,3,4に文字が表示されるという状態です。

> 分かりにくい表現で申し訳ありませんでした。ご迷惑おかけします。
[掲示板ご利用に際し]を読んで頂いたのでしょうか？

> 検索をかけると全く反応がない状態になってしまいました。
小保方さんの研究ノートと一緒で、この内容を見て他の人が何に対して何を、どのようにして検索された
のか同じ事が他の人に再現できるような説明でないと意味がありません。
従って回答するなら、反応がないのは検索の仕方が悪いとしか言いようがありません。
(検索しようとした文字が、検索対象の文字列内に見つからないという事)

> ドキュメントのＣＳＶファイルですが、あらかじめ予備にとっておいた元本ＣＳＶファイルをコピーし
> そのドキュメントのＣＳＶファイルにペーストし再び読込みを行いButton2検索で検索をかけると、
> TextBox2,3,4に文字が表示されるという状態です。
この場合は問題がなくても、仮にデーターの内容が変わっても、検索したい文字列が検索されないのなら
検索の仕方が悪いとしか言えません。
それに元のデーターと言われてもどのようなものかも解らないし、検索と言っても色々な方法がありますし、
もっと具体的なコードなりを明示して説明して頂かないと何を困っておられるのか？さえも私には、
解りません。

※ 不要な全文引用は避けて下さい。

> この場合は問題がなくても、仮にデーターの内容が変わっても、検索したい文字列が検索されないのなら
> 検索の仕方が悪いとしか言えません。
> それに元のデーターと言われてもどのようなものかも解らないし、検索と言っても色々な方法がありますし、
> もっと具体的なコードなりを明示して説明して頂かないと何を困っておられるのか？さえも私には、
> 解りません。
>
> ※ 不要な全文引用は避けて下さい。


何度もすみません。CSVを読込みテキストBoxによる検索は以下の通りになっています。

Do Until IsNothing(Line)
            Dim A As Object                '名前
            Dim B As Object                
            Dim C As Object
            Dim D As Object                '説明

            Items = Line.Split(",")        '１行を区切って項目ごとに分解
            A = Items(1)                   '名前取得
            B = Items(4)
            C = Items(5)
            D = Items(6)　　　　　　　  　 '説明取得 　　　　
            If A = TextBox1.Text Then      'TextBox1が名前の時
                B = Items(4)                    
                B = B.Replace("""", "")          '"" を省く
                TextBox2.Text = B              
            End If
            If A = TextBox1.Text Then
                C = Items(5)
                C = C.Replace("""", "")
                TextBox3.Text = C
            End If
            If A = TextBox1.Text Then
                D = Items(6)
                D = D.Replace("""", "")
                TextBox4.Text = D　　　　　'説明表示　
            End If

            Line = Reader.ReadLine 　　　　　  

     Loop

投稿されたコードは、検索ではなく、比較ですよね。
検索と比較では意味が違うかと、TextBox に表示した場合の内容とファイル保存されている場合の内容が
同じとは限らないので比較された場合、間違った答えが出る場合があります。

" をTextBox に表示する場合どのようなコードを書きますか？
B = B.Replace("""", "")  このコードはどのようなデーターに対してどのような意図をもって使って
おられるのでしょうか？
一度保存した CSV ファイルをメモ帳で開いて見て下さい。
cmDat(i) = cmDat(i).Trim(Chr(34)) と B = B.Replace("""", "")　の違いは？
比較する前に cmDat(i) = cmDat(i).Trim(Chr(34)) をしていないのなら、TextBox のデーターにも付加
して比較しないと同じとは見なされませんよ。

又、下記サイトの内容も
http://codezine.jp/article/detail/2364

何度も同じ事を聞きますが、どのようなデーターを CSV ファイルに保存されているのですか？

>DataGridView1に表示させ、TextBox1に名前を入力しButton2でＣＳＶファイルからTextBox2,3,4
>に文字を表示させてました。

私は、当然  DataGridView1 に表示させたデーターに対して IndexOf メソッドや Instr メソッドなりを
使って検索しているものと思っていました。(下記のような感じのものを)
http://www.hanatyan.sakura.ne.jp/freesoft/vb60logview.htm
DataGridView との関係はどのようになっているのでしょうか？なんのために表示や保存を...。

申し訳ありませんが、私には貴方がなにをしようとされているのかよく見えません。

> 投稿されたコードは、検索ではなく、比較ですよね。
> 検索と比較では意味が違うかと、TextBox に表示した場合の内容とファイル保存されている場合の内容が
> 同じとは限らないので比較された場合、間違った答えが出る場合があります。
>
> " をTextBox に表示する場合どのようなコードを書きますか？
> B = B.Replace("""", "")  このコードはどのようなデーターに対してどのような意図をもって使って
> おられるのでしょうか？
> 一度保存した CSV ファイルをメモ帳で開いて見て下さい。
> 又、下記サイトの内容も
> http://codezine.jp/article/detail/2364
>
> 何度も同じ事を聞きますが、どのようなデーターを CSV ファイルに保存されているのですか？
>
> >DataGridView1に表示させ、TextBox1に名前を入力しButton2でＣＳＶファイルからTextBox2,3,4
> >に文字を表示させてました。
>
> 私は、当然  DataGridView1 に表示させたデーターに対して IndexOf メソッドや Instr メソッドなりを
> 使って検索しているものと思っていました。(下記のような感じのものを)
> http://www.hanatyan.sakura.ne.jp/freesoft/vb60logview.htm
> DataGridView との関係はどのようになっているのでしょうか？なんのために表示や保存を...。
>
> 申し訳ありませんが、私には貴方がなにをしようとされているのかよく見えません。


すみません、まだまだ勉強不足で申し訳ありません。
予備にとっておいた元本ＣＳＶファイルをメモ帳で開いても、DataGridViewからＣＳＶに書き込んだ
ファイルをメモ帳で開いてもカンマ区切りで同じ結果になりました。私の検索と思ってたコードが
比較でしたか、すみません。今はサンプルのようなものを作ってみているのですが、データベース
として研究のキーワードで説明文とか情報を検索、又編集出来れば便利だと思い作っています。
IndexOfメソッドやInstrメソッドとのご指摘ありがとうございます。検索の仕方を勉強して頑張って
みます。色々なアドバイスありがとうございました。