Bye Bye Moore

PoCソルジャーな零細事業主が作業メモを残すブログ

VBAのListBoxに初期値を叩きこむ

実際のところ

まずフォームの方でListBoxを配置。
最初は何も無いように見えます。
f:id:shuzo_kino:20210528232547p:plain


UserFromに以下のような内容の関数を記述します。
この際、フォーム名がUserForm1とかでも「UserForm_Initialize()」です。
私はここで迷いました。

Private Sub UserForm_Initialize()

Dim MyArray(2)
MyArray(0) = 0
MyArray(1) = 12
MyArray(2) = 34

ListBox1.List() = MyArray

End Sub

実行すると、ListBoxに要素が表示されます。
やったね。
f:id:shuzo_kino:20210528233849p:plain