以自定义形式获取文本框的内容

时间:2013-01-16 14:45:26

标签: vba ms-access-2003

目前我已经将一个函数附加到我的表单上的命令按钮,该按钮检索用户输入到表单上的文本框中的内容;这工作正常,但我想用ENTER键模拟这种行为。我怎么能这样做呢?

我在文本框上尝试了输入属性,但只有在焦点转移到文本框时才会出现,而不是在输入后按回车键。

我已经阅读过关于VB的KeyUp事件但是必须有一个更简单的方法 - 我用谷歌搜索了但是找不到我想要的东西。有什么建议吗?

由于

1 个答案:

答案 0 :(得分:1)

在许多情况下,After Update事件适合处理输入文本框的数据,例如:

Private Sub txtFilter_AfterUpdate()
    Me.Filter = "Content " & Me.txtFilter.Text
    Me.FilterOn = True
End Sub

但是,如果您需要编辑或验证数据,则更新前更合适。

Private Sub txtText_BeforeUpdate(Cancel As Integer)
    If Me.txtText = "Invalid" Then
        Me.Undo
        Cancel = True
    End If
End Sub