0

リストボックスがあります。onclickの値を取得して、MicrosoftAccessのリストボックスのコントロールソースにコピーします。

SearchResultsリストボックスの名前です

BookTitleテキストボックスの名前です

このコードを試しましたが、機能しないようです。

Private Sub SearchResults_OnClick()

BookTitle.ControlSource = Forms!Edit!SearchResults.Column(2)

End Sub

どんな助けでも大歓迎ですありがとう！

4

1 に答える 1

2

なぜコントロールソースにコピーしたいのですか？フィールドの名前ですか？そうでない場合は、値を設定するだけです。

Private Sub SearchResults_OnClick()

    Me.BookTitle = Me.SearchResults.Column(2)

End Sub

列にはゼロから番号が付けられていることを忘れないでください。

コメントを編集する

非常に大まかに。

リストボックス：

SELECT ID, Title FROM tbl_Books WHERE Title LIKE ...

小さなコード：

Private Sub SearchResults_OnClick()
    'Save
    Me.Dirty=False
    'Find
    Me.Recordset.FindFirst "ID=" & Me.SearchResults
End Sub

基になるテーブルのデータを編集できるように、適切なコントロールソースを任意のテキストボックスに追加します。必要に応じて、テキストボックスを非表示にすることができます。

于 2012-12-10T20:21:30.990 に答える