新聞中心
VB.net中有幾種方法表示 換行 我現(xiàn)在發(fā)現(xiàn)有 Chr(10),還有個 vbCrLf 我想問還有嗎
錯了,是vbCrLf Chr(13) + Chr(10)
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)公司!專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序定制開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了任城免費(fèi)建站歡迎大家使用!
共兩個字符。
#10是換行符
#13是回車符
有了回車符,代表了一行的結(jié)束,也方便于讀取文本。
不要只打一個,vbCrLf簡單方便,也是一個良好的習(xí)慣。
vb.net中l(wèi)istbox內(nèi)容自動換行如何實(shí)現(xiàn)
也不是不可以實(shí)現(xiàn),只不過復(fù)雜一點(diǎn)而已,具體看下面代碼。不過在需要換行等情況下的文本顯示,還是建議用RichTextBox開啟只讀屬性比較省心、比較合適。
Private?Sub?AutoNextRow()
'獲取ListBox行集合文本
Dim?length?As?Integer?=?(ListBox1.Items.Count?-?1)
Dim?items(length)?As?String?'行文本數(shù)組
For?i?As?Integer?=?0?To?length
items(i)?=?ListBox1.Items(i).ToString
Next
'處理ListBox換行
ListBox1.Items.Clear()?'清空行內(nèi)容
Using?g?As?Graphics?=?Graphics.FromHwnd(ListBox1.Handle)
Dim?result?As?New?List(Of?Object)
Dim?w?As?Single?=?ListBox1.ClientSize.Width
Dim?sf?As?SizeF,?str?As?StringBuilder
For?Each?s?As?String?In?items
str?=?New?StringBuilder
For?i?As?Integer?=?0?To?(s.Length?-?1)
sf?=?g.MeasureString(str.ToString??s(i),?ListBox1.Font)?
If?sf.Width??w?Then
result.Add(str.ToString)
str?=?New?StringBuilder
End?If
str.Append(s(i))
If?i?=?s.Length?-?1?Then?result.Add(str.ToString)
Next
Next
ListBox1.Items.AddRange(result.ToArray)?'填充行內(nèi)容
End?Using
End?Sub
vb.net label 換行
在要換行的地方斷開字符串,用 Environment.NewLine 連接兩個字符串即可。
文章名稱:vb.net換行代碼,vb中換行代碼
網(wǎng)頁網(wǎng)址:http://fisionsoft.com.cn/article/dssopsi.html