投稿日 | : 2007/08/03(Fri) 11:56 |
投稿者 | : tea |
Eメール | : |
URL | : |
タイトル | : 出来ました。 |
魔界の仮面弁士さん、Edwardさん、回答本当にありがとうございます。
Edwardさんにいただいた回答を使わせていただきます。
ありがとうございました。
> With teamControl
> .AddItem "連番" '<--
> .ListIndex = 0 '<--
> '繰り返し処理:1から99'
> For i = 1 To 99
> '追加'
> .AddItem CStr(i)
> Next
> End With