VBA 代码在 MS Access 中不区分大小写的过滤器

Question

我有一个通过 ODBC 连接到 MySQL 数据库的 MS Access 前端。我创建了一个简短的 VBA 代码来根据用户的输入对连续表单应用过滤器。（即用户可以在列表中输入一些字母来搜索名称的任何部分，然后按 "Enter" 应用过滤器。）

我想让这个过程不区分大小写，但我做不到。

我的代码是：

Option Compare Text    
Private Sub txbNameSearch_AfterUpdate()
 Me.Filter = "GuestName LIKE """ & "*" & TempVars!tvGuestName & "*" & """"
 Me.FilterOn = True
End Sub

我认为 "Option Compare Text" 应该可以解决问题，但事实并非如此。如何使过滤不区分大小写？

Answer 1

您可以将其全部转换为 UCase 来执行此操作。

Me.Filter = "UCase([GuestName]) LIKE """ & "*" & UCase(TempVars!tvGuestName) & "*""""

VBA 代码在 MS Access 中不区分大小写的过滤器

Case insensitive filter in MS Access by VBA code

mysql

ms-access

vba

case-sensitive