Do While (InStr(s, " ") > 0) '有兩個空白傳回值>0 s = s.Replace(" ", " ") Loop End Sub. =====輸入範例. This is a sample file. Hello World!!
確定！ 回上一頁
