E / SQLiteLog：（1）接近＆＃34; day＆＃34;：语法错误

Question

我想从现在开始从sqlite x天删除数据 我的device_time列是毫秒。

Function IndexOf(ByRef arr() As String, ByVal str As String) As Integer
    Dim joinedStr As String
    Dim strIndex As Integer
    joinedStr = "|" & Join(arr, "|")
    strIndex = InStr(1, joinedStr, str)
    If strIndex = 0 Then
        IndexOf = -1
        Exit Function
    End If
    joinedStr = Mid(joinedStr, 1, strIndex - 1)
    IndexOf = UBound(Split(joinedStr, "|")) - 1
End Function

有什么东西我不见了？或者还有其他方式我没有从文档中看到？