类型声明字符错误 - MS Access

Question

当我尝试编译我的代码时，我总是收到“类型声明字符”错误，但我不明白为什么。

下面的代码（转述）：

Private Sub cboTest_AfterUpdate() 

'(some code) 

Dim strWhere As String 
Dim lngLen As Long 

lngLen = Len(strWhere - 5) 

strWhere = Left$(strWhere, lngLen) 

'(some code) 

End Sub 

是我工作的.ACCDB文件大约为7000 KB，它已编制好几次前到现在，但由于某种原因，这个每次迭代给我的问题。任何想法可能是什么问题？

由于提前，

Ĵ

Answer 1

这在这里运行，不到风度失败的短字符串：

Private Sub cboTest_AfterUpdate() 

    Dim strWhere As String 
    Dim lngLen As Long 

    lngLen = Len(strWhere) - 5   
    If lngLen >= 0 Then 
     strWhere = Left(strWhere, lngLen) 
    End If 

    '(some code) 

End Sub