这项工作正在Access 2016中执行。创建一个查询,然后根据该查询创建一个表单。使文本框成为查询记录的搜索框。搜索脚本如下所示。 Dim strsearch As String
Dim Task As String
'Check if a keyword entered or not
If IsNull(Me.txtSearch) Or Me.txtSearch = "" Then
MsgBox "Please type in your search keyword.", vbOKOnly, "Keyword Needed"