ray88’s diary

お仕事で困ったとき用の自分用の覚書

AccessVBA リストボックス・コンボボックスの連結列を設定する(どの列の値を使用するか)

■BoundColumnプロパティはリストボックスの連結列(どの列をコントロールの値として使用するか)を設定する
【書式】

コントロール.BoundColumn = 列番号

(例)

Private Sub btn12_Click() '[値にする列を変更]ボタン
    If Me.list1.BoundColumn = 1 Then
        Me.list1.BoundColumn = 2
        Me.btn12.Caption = "2列目の値を取得します"
    Else
        Me.list1.BoundColumn = 1
        Me.btn12.Caption = "1列目の値を取得します"
    End If
End Sub
f:id:ray88:20201122072947p:plain
リストボックス・コンボボックスの連結列を設定する