1樓:匿名使用者
類似 dim a as string a=「 a b」 然後你可以呼叫a.trim()就是去掉空格。
2樓:匿名使用者
'重新發一次:
'這樣,可去除空格
private sub command1_click()dim a as string,b as stringa="1234 5678"
for i=1 to len(a)
if mid(a,i,1)<>" " thenb=b & mid(a,i,1)
end if
next i
print "去除空格前: " & a
print "去除空格後: " & b
end sub
3樓:匿名使用者
'此函式killspace用以除去字串中的空格,請將此函式貼上到**視窗空白處。(不在任何sub過程裡)function killspace(expression)
dim tmps
for i = 1 to len(expression)tmpt = mid(expression, i, 1)if tmpt <> " " then tmps = tmps & tmpt
next i
killspace = tmps
end function'在某個過程裡呼叫此函式,例如:private sub command1_click()text1.text=killspace("7 591 6512 1458 050")end sub'這樣在text1裡就顯示:
759165121458050
4樓:痴情為你
要那麼麻煩幹嘛,佔用篇幅,還費頭腦去看和理念。
用最簡單的就好了
replace(字串, " ", "")例:text1.text=replace(text1.text, " ", "")
5樓:
replace(expression, find, replace[, start[, count[, compare]]])
舉例:替換掉字串中空格
dim a as string
a = "+ ab c +"
msgbox replace(a, " ", "")
vb 如何去掉一個字串中的空格
6樓:網海1書生
ltrim(字串) '去掉字串左邊的空格rtrim(字串) '去掉字串右邊的空格trim(字串) '去掉字串左右兩邊的空格replace(字串, " ", "") '去掉字串中的所有空格
7樓:匿名使用者
可以使用replace函式去除字串中的空格例如:private sub command12_click()msgbox replace("中華 人 民共 和 國 ", " ", "")
end sub
將彈出訊息框顯示:「中華人民共和國」
vb中去除字串頭尾空格的函式是什麼??
8樓:齊爸
語法ltrim(string)
rtrim(string)
trim(string)
必要的 string 引數可以是任何有效的字串表示式。如果 string 包含 null,將返回 null。
ltrim,rtrim,及 trim 函式示例
本示例使用 ltrim 及 rtrim 函式將某字串的開頭及結尾的空格全部去除。事實上只使用 trim 函式也可以做到將兩頭空格全部去除。
dim mystring, trimstring
mystring = " <-trim- " ' 設定字串初值。
trimstring = ltrim(mystring) ' trimstring = "<-trim- "。
trimstring = rtrim(mystring) ' trimstring = " <-trim-"。
trimstring = ltrim(rtrim(mystring)) ' trimstring = "<-trim-"。
' 只使用 trim 函式也同樣將兩頭空格去除。
vb中,去掉一個字串中的所有空格怎麼寫???
9樓:匿名使用者
ltrim(x),rtrim(x),trim(x) :去掉空字元。
ltrim(x) 去掉x左邊的所有字元。
trim(x) 去掉x左右邊的所有字元
rtrim(x) 去掉x右邊的所有字元。
字元與字元間的空格不會被去掉。
x=ltrim(「 this is good 「)結果:x=「this is good 「
x=trim(「 this si good 「)結果:x=」this is good」
10樓:鬼火狼煙
replace("a b c"," ","")
"a b c"就是你要去的字串,也可以是字串變數,第2個就是個空格,第三個""是個空字元意思是把"a b c"裡面的空格換程空字元
11樓:
有個專門的函式,啊,忘記了……
不過你也可以自己寫這樣的函式
VB分割字串,VB字串從指定字串分割
汗.split函式是可以指定拆分次數的.在分隔符後面指定拆分成2份就行了.樓上的竟然搞那麼複雜 debug.print split str,2 strname as string,paramarray intscores as variant dim inti,k as integerdim sub...
vb6中字串相加,vb6中字串相加
因為你 a,b,c 三個變數定義錯誤 不應該是字串型別 而應該是 數值型 dim a as long b as long c as long vb語言中怎麼輸入加法 比如 text3.text text1.text text2.text 是字串相加,結果就是把兩個字串連起來,正確應該是text3.t...
VB中,怎樣在已知的字串中插入字元
很簡單嘛,先將原字串拆分成兩半,加入後再合上即可。dim t as string dim k as string t abcdfghijklmn k mid t,1,4 e mid t,5 這個 是將字母e插在從左向右第5個位置上。原字串是 abcdfghijklmn 插入後的字串是 abcdefg...