• ベストアンサー

VB2010　変数に格納する文字列を増やす

単純なことなのですが、、、どうしても方法が思い浮かびません。 下記のプログラムでは2735回変数にDataGridの値を格納 していますが、本来行いたい処理は Dataの中に2735回出た結果を文字列として連結したいです。 （たとえば..1回目でA　2回目でBと出た場合、DataにAB) 方法をご教授下さい。 For Row=0 To 2734 Data=Me.DataGridView1(CC,Row).Value Next

質問者が選んだベストアンサー

  • ベストアンサー
回答No.4

Data &= Me.DataGridView1(CC,Row).Value または String.Concat を使う Data = String.Concat(Data, Me.DataGridView1(CC,Row).Value) または高速処理が可能な StringBuilder を使う Dim sb As New System.Text.StringBuilder() For Row = 0 To 2734 sb.Append(Me.DataGridView1(CC,Row).Value) Next

その他の回答 (3)

  • samtomsan
  • ベストアンサー率55% (1060/1897)
回答No.3

大文字小文字を間違いました。 dATA -> Data

  • samtomsan
  • ベストアンサー率55% (1060/1897)
回答No.2

試していませんが Data=dATA + Me.DataGridView1(CC,Row).Value あるいは Data+=Me.DataGridView1(CC,Row).Value

  • freetaka
  • ベストアンサー率53% (106/197)
回答No.1

＞（たとえば..1回目でA　2回目でBと出た場合、DataにAB) Data = Me.DataGridView1(CC,Row).Value の部分を Data = Data & Me.DataGridView1(CC,Row).Value という形ではだめですか？ 何か特殊な規則があるのでしょうか？

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • 変数に格納している文字列の読み込み

    ある変数($text)にHTMLデータが格納されています。 その変数内の文字列を、1行ずつ読み込む方法はあるのでしょうか。 $textをファイルに変換して読み込むべきでしょうか。 ぞ存知の方、ご教授をお願いします。

    • ベストアンサー
    • PHP
  • Csvから１行ずつ変数に格納するには；

    いつもお世話になっています。 次のようなcsvファイルがあります。 会員番号,パスワード,データ１,データ２,データ３ 1234567,1111,1970/1/1,1990/4/1,A 1111111,1,1960/1/1,1985/4/1,AB ・ ・ ・ このcsvファイルをExcelのVBAで次のようなコードで読みとろうとしています。 Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFile("csvファイル名") Set ts = f.OpenAsTextStream(1, -2) ssk = ts.readline readlineは１行だけ読み込むと覚えているのですが、なぜか変数sskにはすべての行が連結された状態で格納されてしまいます。 ２回目以降のreadlineでは「ファイルにこれ以上データがありません。」と出ます。何か根本的に間違っているのでしょうか；； このようなcsvファイルを、正しく１行ずつ変数に格納する方法にはどのようなものがありますでしょうか。 よろしくお願いします。

  • VB2010でデータグリッドビューに列追加

    VB2010でデータグリッドビューを使用したいのですが、 下記のコードを実行すると、 ※エラー1「指定された列は DataGridView コントロールに既に属しています。」がでます。 列インデックスがいるのかなと、コードを追加してみると ※エラー2「プロパティIndexはReadOnlyです」がでました。 どう直せばよいかわかるかた教えてください。 どうぞよろしくお願いします。 変数に入っているもの 系列数=2 系列名(0)=deg 系列名(1)=V 系列名(2)=P Public Class Form2 Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "データビュー" '初期化 Me.DataGridView1.Columns.Clear() '列追加 Dim i, j As Long Dim TBColumn As New DataGridViewTextBoxColumn() For i = 0 To 系列数 TBColumn.Name = 系列名(i) TBColumn.Index = i '←※エラー2　エラー後に追加してみた Me.DataGridView1.Columns.Add(TBColumn) '←※エラー1 Next i '行追加 Me.DataGridView1.RowCount = データ数 'データ追加 For j = 1 To データ数 For i = 0 To 系列数 Me.DataGridView1(系列名(i), CInt(j - 1)).Value = グラフデータ(i, j) Next i Next j '列幅設定 For i = 0 To DataGridView1.Columns.Count - 1 Me.DataGridView1.Columns(i.ToString).Width = 30 Next i End Sub End Class

  • PHPの変数で最初から2行分の文字列を取得したい

    phpで変数に格納されたデータの最初の2行分の文字列だけを取り出す方法を教えてください。 例）複数行のデータ（\n区切り） aaaa bbbb cccc dddd 上記のデータが変数$valueに格納されています。 $valueに格納されたaaaa～bbbbまでを取得するにはどうしたらいいのでしょうか？

    • ベストアンサー
    • PHP
  • データセットのある値を変数に格納するには？

    いつもお世話になります。 ＶＢ．ＮＥＴ　＋　ＡＣＣＥＳＳ２０００です。 今個々の入出庫のデータを個別に入力表に入れています。 出庫の入力をしたときに、赤残にならないようなチェックを かけたいと考えており、品質項目で絞り込んだ数値データを 別のデータセットに入れてDatagridに一覧表示させています。 出庫数量を入力して更新するときに、出庫後の在庫がマイナス にならないように予めDatagridに表示させた数値データのある 列の値（ロット別の合計値）を変数に格納して出庫予定量と 比較し、マイナスの場合は警告メッセージを出すようにすること を考えています。 Datagridのあるデータを変数に取り込むようにするにはどうしたら いいのでしょうか？ またこの考え方は間違っているのでしょうか？ ご教示よろしくお願いいたします。

  • VB.NET 配列の格納

    VB.NET 配列の格納 エクセルから任意の列の値を格納したいのですが・・・ 現在、値の取得は以下のようなFor文ループを書いています。 各値を一時記憶（格納）したいのですが、どう書けばいいのでしょうか。 また、各列内で重複する値があった場合、重複を避けて値を取得したいのですが どう書いていいかわかりません。 初歩的な質問で申し訳ありませんが、宜しくお願いします。 PN()→G列の各セルの値の変数 JN()→H列の各セルの値の変数 の変数GYO→シートの最終行 j = 1 For i = 1 To GYO '【リストのG列から部品番号を取得】 PN(j) = xlSheet.Cells(i, 7).Value '【リストのH列から部品和名を取得】 JN(j) = xlSheet.Cells(i, 8).value Next

  • SharedObjectに変数を格納したいのですが、、

    最近Flashの勉強を始めたばかりで、この件についてどう調べても分からないので教えていただけませんでしょうか。 SharedObjectに、数値や文字列を保存することはできるのですが、 変数をそのまま保存する方法はありますでしょうか。 XMLからデータを読み込み　⇒　読み込んだデータをSharedObjectに保存　⇒　SharedObjectから呼び出して利用 という流れを作りたいと考えています。 具体的には、XMLから読み込んだデータを変数Aに格納して、変数AをSharedObjectに保存しようとしているところがうまく行かず、困っています。。 良い方法がありましたらご教授ください。 どうぞ宜しくお願いいたします。

    • ベストアンサー
    • Flash
  • CString型の文字列連結について

    質問させて頂きます。 開発環境はVC++.netです。 CString型の文字列連結について教えて頂きたく。 CString Test[_MAX_FNAME+1]; という変数にがあるとします。 Test変数のデータは Test[0]には"2" Test[1]には"1" が格納されてるとします。 Test変数のデータをCString Text1という変数に 以下のようなソースで文字列連結処理を行ったのですが、だめでした。 何がいけないのでしょうか？ for(int i = 0; i <= 2; i++) { Text1 += Test[i]; } 実行結果は Text１には"2"が格納されたままでした。 実際はText1には、"2""1"となってほしい。 分かりにくい説明とは思いますが、 回答、ヒントなどを頂けますでしょうか 宜しくお願い致します。 それと、もしよかったら、Text1の格納データは "2","1"としたいので、カンマ区切りのやりかたなども ヒントを頂けたら幸いです。 以上です。 宜しくお願い致します。

  • ＶＢＡの配列の格納について

    エクセルのＶＢＡで、セルのデータを配列に格納するスピードを向上したいと思います。 例えば、A1～A10000のセルにデータを書き出す場合、 For 行番号 = 1 To 10000 Cells(行番号, 1).Value = 1 Next よりも、一旦、配列に書き込んだ後、一気にセルに書き込んだ方法が早いのですが、 For 行番号 = 1 To 10000 HAIRETU(行番号, 1) = 1 Next Range("A1:A10000").Value = HAIRETU() 今度は、A1～A10000に書き込んだデータを、再度、配列に格納する場合、 For 行番号 = 1 To 10000 HAIRETU(行番号, 1) = Cells(行番号, 1).Value Next とすると時間がかかるので、 HAIRETU() = Range("A1:A10000").Value というような処理をしたいのですが、うまくいきません。 よい方法がありましたら、ご教授ください。 よろしくお願いします。

  • VBAの変数について

    VBAでUserFormからデータを入力します。 入力された各データをTarget1～Target20に代入します。 各Targetにデータが入っている場合は、配列K(i)に「1」を格納します。 そこで、Target "1"～"20" を変数iであらわしたいのですが、どのように表現したらよいのでしょうか。 Dim i As Integer Dim K(20) As Integer Target1 = TextBox1.Value Target2 = ComboBox1.Value : : Target19 = TextBox12.Value Target20 = ComboBox8.Value For i = 1 To 20 If 『　　？　　　』 <> "" Then K(i) = 1 EndIf Next i

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する