ms-access - 从第一个表值 Access 中设置表单的组合框默认值

Question

我查找了有关此主题的信息，但没有任何效果。

我有一个名为 TbKlient 的 Access 表，其中包含列 ID（主键，自动编号）和名称（公司名称）以及带有组合框 cbName 的 FormVT1。我的目标很简单，但我无法实现。所以我想，当我打开这个表单时，用 TbKlient 的 Name 列的第一行自动填充 cbName 组合框的默认值。

感谢所有的建议。谢谢！

Answer 1

尝试从 VT1 分配 onOpen 事件表单

Private Sub Form_Open(Cancel As Integer)
dim rst as recordset

set rst=currentdb().openrecordset("SELECT [Name] FROM [TbKlient] ORDER BY [ID]") ' author, please check if you really want record with the lowest ID that is called by you "first record"

if not rst.eof then

    Me.cbName.DefaultValue = rst![Name] 

end if 

rst.close
set rst=nothing

end sub