主题：关于拼音查找的问题

我在表里设置了一个 拼音简码 列 用来获取客户名称的拼音首字母  现在发现一个问题

比如有多个以上海开头的公司  我输入 sh 按理说应该筛选出所有以上海开头的公司名称  但现在的情况是 都不显示

我的筛选代码如下

With e.Form
    If e.sender.text <> "输入关键字查询" Then
        Dim dst As Table = Tables("客户信息")
        Dim txb1 As WinForm.TextBox = .Controls("TextBox1")
        dst.Filter = "[电话] Like '*" & txb1.text & "*' or [客户名称] Like '*" & txb1.text & "*' Or [地址] Like '*" & txb1.text & "*' Or [联系人] Like '*" & txb1.text & "*' Or [拼音简码] Like '*" & txb1.text & "*'Or [开户行] Like '*" & txb1.text & "*'Or [税号] Like '*" & txb1.text & "*'Or [账号] Like '*" & txb1.text & "*'"
    End If
End With