コントロール ListBoxコントロール、Listプロパティの使用例

VB&VBA
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[VB&VBA][コントロール ListBoxコントロール、Listプロパティの使用例]

Dim MyArray(6, 3)

Private Sub UserForm_Initialize()

    Dim i As Single

    ListBox1.ColumnCount = 3    

    For i = 0 To 5
        MyArray(i, 0) = i
        MyArray(i, 1) = Rnd
        MyArray(i, 2) = Rnd
    Next i

    ListBox1.List() = MyArray

End Sub

Private Sub CommandButton1_Click()
' 1 列目と 3 列目の内容を入れ替えます。

    Dim i As Single
    Dim Temp As Single

    For i = 0 To 5
        Temp = ListBox1.List(i, 0)
        ListBox1.List(i, 0) = ListBox1.List(i, 2)
        ListBox1.List(i, 2) = Temp
    Next i
End Sub





Production Japan Import Application. Since 1998