1樓:匿名使用者
dim tmpstr
dim resstr as string'處理bai後的字元du串zhi
tmpstr=split(text1.text,vbcrlf)for i=lbound(tmpstr) to ubound(tmpstr)
if trim(tmpstr(i))<>"" thenresstr=resstr & tmpstr(i) & vbcrlfend if
next
print resstr'顯示處理後
的字串
假設 字串都在dao text1.text 中這種處理只適用於內一般的簡單情容況,還會出現其他情況,如果你遇見了就追問。
2樓:寶之小小葉
private sub ***mandbutton1_click()
dim str as string '處理完後放回textbox的字串
dim arr() as string
arr = split(textbox1.value, vbcrlf) '通過換行符分割textbox內的文字
for i = 0 to ubound(arr)
if trim(arr(i)) <> "" then
str = str & arr(i) & vbcrlf '迴圈遍歷,如果改行不是空行,則回講陣列內文字拼接到輸答出用字串變數
end if
next i
textbox1.value = str '講新字串放回textbox
end sub
3樓:領奴三千
dim tmpstr() as stringtmpstr = split(textbox1.text, vbcrlf)
textbox1.text = ""
for i = 0 to ubound(tmpstr)if tmpstr(i) <> "" thentextbox1.text = textbox29.text & tmpstr(i) & vbcrlf
end if
next
中為什麼按下空格鍵會刪除後面的文字
這是word 插入模式 與 改寫模式 的問題正常情況下是 插入模式 而你出現這種情況,則是 改寫模式 這兩種模式的切換方法 一種 按一下鍵盤上的insert鍵就可以了在delete鍵上面 因為你當前用的是 覆蓋 模式,空格相當於覆蓋了一個字,看起來像是刪除了後面的文字 按鍵盤上的insert鍵一次,...
vb查詢文字重複次數,用vb找到文字中重複的行?
是查詢 字 重複還是 句 重複?vb 如何獲取字串中一個字元出現的次數 迴圈遍歷這個字串,用一個計數器來記錄該字元的個數。int fun char str,char ch return i function strcount stra as string,strb as string as long...
vb的文字框如何實現只允許從第二行開始輸入
做一個文字框變動事件,後面 如下 if left textbox1.text,1 vbcrlf then msgbox 請在第二行開始輸入 textbox1.text vbcrlf 直接給一個回車end if 先檢查文字框有無文字,沒有的話就在第一個輸入字元在 中加上一個隱藏的換行符。如果已有,就正...