作者在 2015-03-13 17:36:20 发布以下内容
cStr="a b c d" && 变为 "a b c d"
Do While Space(2)$cStr
cStr=Strtran(cStr,Space(2),Space(1))
EndDo
MessageBox(cStr)
cStr="a b c d" && 变为 "a b c d"
Do While Space(2)$cStr
cStr=Strtran(cStr,Space(2),Space(1))
EndDo
MessageBox(cStr)