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

【问题标题】：Set form's combobox default value from first table value, Access从第一个表值 Access 中设置表单的组合框默认值
【发布时间】：2013-11-08 10:27:53
【问题描述】：

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

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

感谢所有建议。谢谢！

【问题讨论】：

标签： ms-access combobox default-value

【解决方案1】：

尝试在FromVT1中分配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

【讨论】：

我使用了这段代码，但仍然无法显示所需的默认值。实现这一点的最简单方法是通过字符串将其固定写入 cbName 但代码更复杂，如果我更改它不会覆盖它...代码看起来不错，但我不知道问题出在哪里。