使用下拉列表自动填充字段

时间:2016-09-07 07:17:16

标签: vba access

我有一个与表(产品)链接的组合框,我需要在用户选择值时自动填充字段。 字段中的数据也来自表格产品。

谢谢

2 个答案:

答案 0 :(得分:1)

如果你的组合框行源是

SELECT ProdID, ProdName, ProdColor FROM Products

和列宽0; 3; 0(即只有ProdName可见),您可以使用AfterUpdate事件将数据从组合框列复制到其他控件。

Private Sub cboProduct_AfterUpdate()

    Me!txtID = Me!cboProduct.Column(0)
    Me!txtColor = Me!cboProduct.Column(2)

End Sub

答案 1 :(得分:-1)

最简单的方法就是创建一个myComboBox_SelectionChanged()事件。然后在您的方法中分配您想要的值。

Private Sub myComboBox_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles myComboBox.SelectionChanged

     // Exact the selection here and put it in your table.

End Sub