在女士访问表单中按“显示全部”按钮后删除关键字

Posted

技术标签:

【中文标题】在女士访问表单中按“显示全部”按钮后删除关键字【英文标题】:Erasing keywords after pressing "Show All" button in MsAccess Form 【发布时间】:2018-07-11 01:15:37 【问题描述】:

请忽略,刚刚找到答案:

在我目前的 MsAccess 表单中:

  Keywords window - where I can type text to look up records, by the Client Name,
  Search button - after pressing on it I can see the search results
  Show All button - after pressing on which I see all the records 

目前,按下全部显示后,我在关键字窗口中输入的内容都会保留在那里。我希望每次按全部显示按钮

时都会删除关键字

有可能得到这样的结果吗? 如果是,我该怎么做或 - 我如何修改我的事件程序?

以下是我的事件过程代码: btn_Search_Click() - 按某些关键字搜索 btn_ShowAll_Click() - 显示所有记录

Option Compare Database
Option Explicit

Private Sub btn_Search_Click()

Dim strsearch As String
Dim strText As String
strText = Me.TxtKeywords.Value
strsearch = "SELECT * from qry_Clients 
where ((ClientName LIKE ""*" & strText & "*"") OR(MedRecNumber LIKE ""*" & 
strText & "*""))"
Me.RecordSource = strsearch

End Sub

Private Sub btn_ShowAll_Click()

Dim strsearch As String
strsearch = "SELECT * from qry_Clients"
Me.RecordSource = strsearch

End Sub

谢谢!

【问题讨论】:

@WolfgangK - 我刚刚修改了原始帖子,以包含我的事件过程的代码。谢谢! 【参考方案1】:

对不起,我刚刚找到了答案! 为了能够在点击“显示全部”按钮后清除文本框, 我必须将最后一个字符串添加到我的

Private Sub btn_ShowAll_Click():

Me.TxtKeywords = ""

【讨论】:

以上是关于在女士访问表单中按“显示全部”按钮后删除关键字的主要内容,如果未能解决你的问题,请参考以下文章

按下回车默认提交form表单问题

在位置访问权限中按下允许按钮后如何执行操作?

女士访问通过表单向表格添加数据

如何判断按钮是不是在不同的关键帧中被按下?

在表单中按 Enter 时执行的默认操作

删除按钮后访问 2007 “Return without Gosub”