質問です。

タグの編集
投稿者 ひさ  () 投稿日時 2007/9/16 00:42:00
A1,A2,A3とゆう名前のオプションボタンがあるとして例えば 
 
dim a as object 
 
For i = 1 to 3 
    a = "A" & i 
  a.Text = i 
Next 
 
こんな感じの事をしたいのですがどのようにすれば良いでしょうか?VB6を使っています。どうかよろしくお願いします。
投稿者 neptune  () 投稿日時 2007/9/16 03:10:00
こんにちは 
 
VB6ならば、ご希望の事は普通コントロール配列、Collection、 
FormのControlsコレクションなどを使用します。 
 
試してませんが、こんな感じでいけるのかな? 
dim a as optionbutton  
 
For i = 1 to 3  
    form1.controls("A" & i").text=i 
Next  
 
でも、やはりコントロール配列、Collectionの方をお勧めします。
投稿者 ひさ  () 投稿日時 2007/9/16 09:46:00
どうもありがとうございます。いろいろ勉強になりました。試してみようと思います。