none
VBで変数を用いてコントローラを指定したい RRS feed

 > 

  • 質問

  • Question
    サインインして投票
    0
    サインインして投票

    成績で例えると

    テキストボックス1～10に10人分の成績が入力されていて

            Dim Count1 As Long
            Dim seiseki(10) As Long

            For Count1 =  0 To 9
    　　　　seiseki(Count1) = テキストボックス　+　"Count1" .Text
            Next

    のようにいっぺんに読み込む方法は無いのでしょうか？

    2014年2月6日 8:52
    |

回答

  • Question
    サインインして投票
    2
    サインインして投票

    そのコードに一番近いやり方なら Controls プロパティを使う方法でしょう。

     For Count1 = 0 To 9
     seiseki(Count1) = Controls("TextBox" & (Count1 + 1)).Text
 Next
    タブコントロールやグループボックスの中に貼り付けている場合はそのコントロールの Controls プロパティから参照する必要があります。
    また、このコードでは暗黙の変換を利用しています。Text プロパティが数値変換不可能な文字列が入力されていた場合、例外が発生するので注意してください。
    • 回答の候補に設定 星 睦美 2014年2月7日 0:39
    • 回答としてマーク 星 睦美 2014年2月20日 4:22
    2014年2月6日 13:52
    |
    モデレータ