0

VisualBasicアプリケーションの作成に15個のテキストボックスを使用しています。テキストボックスの名前は、「TB1」から「TB15」までです。ここで、値を「a」という名前の2D配列にコピーします。これをどのように行うべきですか?以下のコードを手伝ってください

For i = 0 To 4 Step 1     
  For j = 0 To 2 Step 1
    a(i, j) = Convert.ToInt32(TB1.Text)    
  Next
Next

行をどのように変更する必要がありa(i, j) = Convert.ToInt32(TB1.Text)ますか?

4

1 に答える 1

1

ステップはデフォルトで常に+1であるため、これは必要ありません。Controls()を呼び出すことにより、名前でコントロールにアクセスし、オブジェクトに完全にアクセスできます。

    Dim Counter As Long = 0
    For i = 0 To 4
        For j = 0 To 2
            Counter += 1
            a(i, j) = Convert.ToInt32(Controls("TB" & Counter.ToString).Text)
        Next
    Next
于 2012-05-09T19:06:04.003 に答える