最近2018中文字幕在日韩欧美国产成人片_国产日韩精品一区二区在线_在线观看成年美女黄网色视频_国产精品一区三区五区_国产精彩刺激乱对白_看黄色黄大色黄片免费_人人超碰自拍cao_国产高清av在线_亚洲精品电影av_日韩美女尤物视频网站

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
vb.net換行代碼,vb中換行代碼

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