神马品牌网玻尿酸法令纹越打越深:replace函数我不太会用，请指教
来源：百度文库 编辑：神马品牌网 时间：2024/05/12 07:40:01
function sqlstr(data)
sqlstr="'"&replace(data,"'","''")&"'"
end function
或许我基础太差，对sqlstr="'"&replace(data,"'","''")&"'"我实在理解不了，我知道replace是替换用的，可replace(data,"'","''")中的第一个不是字符串表达式，包含要替换的子字符串吗？怎么中个data？里面也没有"'"啊
还有这是个防止单引号引起sql语句错误的函数，可sqlstr="'"&replace(data,"'","''")&"'"是什么意思，弄糊涂了
sqlstr="'"&replace(data,"'","''")&"'"
end function
或许我基础太差，对sqlstr="'"&replace(data,"'","''")&"'"我实在理解不了，我知道replace是替换用的，可replace(data,"'","''")中的第一个不是字符串表达式，包含要替换的子字符串吗？怎么中个data？里面也没有"'"啊
还有这是个防止单引号引起sql语句错误的函数，可sqlstr="'"&replace(data,"'","''")&"'"是什么意思，弄糊涂了
这个SQLSTR是一个字符串变量。其实就是sqlstr="....."
又因为replace()函数返回的是字符型，所以要用'"..'"来进行括起来。这是因为不能在双引号里嵌双引号，所以只能用单引号代替双引号。中间的&是连接符。
replace(data,"'","''")中，DATA是一个字符串，从这个字符串中找出'这个字符替换为''二个这样的字符。"'"指的是这个'这个字符。因为是字符，所以要用双引号括起来。
如果出现一个单引号.就换成一对单引号
Function Replace(Expression As String, Find As String, Replace As String, [Start As Long = 1], [Count As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) As String
所以你说的函数所做的工作是把data字符串中的单引号'替换成双引号"，并在开头和结尾处加上单引号.
耐心点读代码麻！