CDのコンボボックスの結果を名称として表示する。コンボボックス＋テキストボックス 2列目セット
'コンボボックスのデータ部の列は、Column(列番号） で取得できます。
'通常は、1列目が (0) 2列目 が (1) で表されます。
'更新後イベントに 下記のように記載することで、2列目の名称がセットされます。
'注意！レコード移動時等のイベントを考慮しないと、非連結エリアの名称は通常ブランクとなります。
Private Sub cmbID_AfterUpdate()
'コンボボックスが入力されていたら、2列目を txt名称にセットする。
Me.txt名称 = ""
If IsNull(cmbID) = False Then
Me.txt名称 = Me.cmbID.Column(1)
End If
End Sub