Access如何判断字符串从左边第一个数字为5

步骤以下：

一、打开VBA（ALT+F11）
二、右键模块=》插入=》模块
三、粘贴如下代码：

Public Function CutStr(chkStr As String) As String
'截取字符串中第一个数字符
Dim i As Long
For i = 1 To Len(chkStr)
If Mid(chkStr, i, 1) Like "[0-9]" Then
CutStr = Mid(chkStr, i, 1)
Exit Function
End If
Next i
CutStr = chkStr
End Function

四、保存，关闭VBA

五、在access中新建查询，在默认的语句后面增长where条件
SELECT ......FROM 表 where CutStr(字段)== 5