Public Function Checkstr(Str)
        If Isnull(Str) Then
            CheckStr = ""
            Exit Function  x
        End If
        Str = Replace(Str,Chr(0),"")
        CheckStr = Replace(Str,"'","''")
    End Function
这两个要怎么理解才对呢Str = Replace(Str,Chr(0),"")
        CheckStr = Replace(Str,"'","''")谢谢