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,"'","''")谢谢

Str = Replace(Str,Chr(0),"")
Chr(0)的值是0 这句的意思是用空格替换掉字符串中的0
CheckStr = Replace(Str,"'","''")
这句的意思是用两个单引号替换掉字符串中的单引号