Question

在Access 2010中，我已经构建了一个日历表单，我希望能够显示在给定月份中关闭的人员。

日历的每个框显然代表不同的一天。我有一张名为＆＃34;分隔＆＃34;设置最终存储员工姓名和他们离开的日期 - 每条记录一天。

这是我迄今为止尝试在其中一个方框（代表一天）上进行测试的内容：

Private Function fillDays()
    Dim rsNames As DAO.Recordset

    Set rsNames = CurrentDb.OpenRecordset("SELECT * FROM Separated")
    If Not rsNames.EOF Then
        b0.Text = rsNames![Associate]
    End If
    Set rsNames = Nothing
End Function

我收到以下调试说明：＆＃34;运行时错误＆＃39; 2185＆＃34;
＆＃34;除非控件具有焦点，否则您无法引用控件的属性或方法。＆＃34;

调试器使用＆＃34; b0.text = rsNames突出显示该行！[Associate]

我需要从我的＆＃34;分离＆＃34;中引用一个索引编号吗？ table？...或者使用某种查询方法会更有效。

Answer 1

假设b0是一个文本框，你得到的错误是由于当所述文本框没有得到关注时你不能使用它的Text属性。

如MSDN中所述，«当控件具有焦点时，Text属性包含当前在控件中的文本数据; Value属性包含控件的最后保存数据。将焦点移动到另一个控件时，控件的数据将更新，并且Value属性将设置为此新值。 文本属性设置无法使用，直到控件再次获得焦点 »（强调我的）。

尝试使用Value（帮助here）代替：

b0.Value = rsNames![Associate]

参考表填写日历表格

1 个答案: