database - 将名称添加到日期范围搜索。微软访问 VBA
问题描述
因此,我在 MS Access 中为工作创建了一个缺陷数据库,并且我正在使用搜索表单来查找特定日期之间的特定员工缺陷。我已经使用按钮进行日期范围搜索,但我还没有弄清楚如何将我的 EmployeeNameBox 添加到过滤器结果中。这就是我所拥有的。
Private Sub Searchbtn_Click()
Me.Filter = "[DayMonthYear] BETWEEN #" & Me.Date1Filt & "# AND #" & Me.Date2Filt & "#"
Me.FilterOn = True
End Sub
非常适合我想要的日期范围,但我还需要添加员工姓名。任何帮助将非常感激。
解决方案
假设您EmployeeNameBox
在搜索时总是会被填充,您只需将其添加到您的过滤器中。我发现将过滤器存储在变量中更容易,然后将其分配给Me.Filter
最后。所以像:
Private Sub Searchbtn_Click()
Dim sFilter as String
sFilter = _
"[DayMonthYear] BETWEEN " & _
"#" & Me.Date1Filt & "# AND " & _
"#" & Me.Date2Filt & "# " & _
" AND [EmployeeName] = """ & Me.EmployeeNameBox & """"
Me.Filter = sFilter
Me.FilterOn = True
End Sub
推荐阅读
- prolog - 比较变量 prolog 的值
- c# - ajax POST 发送空值
- ios - PanGesture 后按钮位置未正确更新
- checkout - 更多 Square Checkout 示例问题 - 没有可用的验证 ID
- php - 从类内部捕获异常
- java - Scala 编译器在编译 Scala 程序中导入的 Java 库时是否调用 javac?
- javascript - 如何在隐藏的选项卡面板中获取元素位置?
- javascript - 基于来自后端的数组生成字符串 - Javascript
- swift - Core Data 中父实体的计算属性
- wordpress - 在 wordpress 中创建隐藏的自定义帖子类型