1樓：網海1書生
用split函式把文字框的內容按照回車換行分割成陣列，這樣陣列中的每個元素就是每行的內容了：
dim s() as string
s=split(text1.text,vbcrlf) '假定文字框是text1。
'這時候s(0)就是第一行，s(1)是第二行，……s(n)是第n+1行。
'其他的自己應該知道怎麼做了吧？
2樓：瘋子不可理解
ascii 碼10 13 是換行。用ascii碼值識別。。。第二個問題，如果是2那種情況。。字串向前退一個。
3樓：
private sub text1_change()dim arrstr() as stringdim i as long
dim j as long
dim bytarray() as byteredim preserve arrstr(1)bytarray = text1.textj = 1
for i = 0 to len(text1.text) - 1if (bytarray(2 * i) = 13) or (bytarray(2 * i) = 10) then
j = j + 1
redim preserve arrstr(ubound(arrstr) + 1)
else
arrstr(j) = arrstr(j) + chr(bytarray(2 * i))
end if
next
'除錯用
'for i = 1 to j
'print arrstr(i)
'next
end sub
好累啊，應該是可以用的
js怎麼獲取文字框內容，JS獲取文字框的值
柔瑗植飛舟 1.getdlgitem獲取文字編輯框的指標來獲取內容 2.使用 getdlgitemtext 函式獲取文字框的內容。3.使用 getdlgitemint來直接獲取數值內容。4.第四種方法在類的定義 變數來關聯 控制元件5.第五種使用sendmessage獲取編輯框內容。1.getdlg...
vb裡怎麼讓單擊後文字框擴大,同時文字框內的文字按照規定要求擴大N倍
private sub text1 click n inputbox 你要擴大幾倍？2 text1.width text1.width ntext1.height text1.height ntext1.font.size text1.font.size n end sub 請參閱我部落格中專門為回...
在中怎麼把文字框內的文字設成黑色淡色
選中文字右擊 字型 點 字型顏色 後小箭頭 選 其他顏色 彩色色塊下面灰色向黑色過度色中選合適的顏色 確定 確定 word2010如何將文字設定成紅色,強調文字顏色2,淡色40 選中文字，從工具欄中單擊字型顏色的圖示a右側的下拉式標記，選擇相應顏色，如圖 用word開啟檔案 選中文字區域 開始 字型...