日本综合一区二区|亚洲中文天堂综合|日韩欧美自拍一区|男女精品天堂一区|欧美自拍第6页亚洲成人精品一区|亚洲黄色天堂一区二区成人|超碰91偷拍第一页|日韩av夜夜嗨中文字幕|久久蜜综合视频官网|精美人妻一区二区三区

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

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
vb.net取文本寬度 vb文本框高度

VB.NET根據(jù)輸入內(nèi)容來確定繪圖的長寬?

命名空間聲明:

讓客戶滿意是我們工作的目標,不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術通過有效、簡單的方式提供給客戶,將通過不懈努力成為客戶在信息化領域值得信任、有價值的長期合作伙伴,公司提供的服務項目有:空間域名、網(wǎng)頁空間、營銷軟件、網(wǎng)站建設、黎城網(wǎng)站維護、網(wǎng)站推廣。

Imports System.Drawing

代碼參考:

Dim?g?As?Graphics?=?Me.CreateGraphics?

Dim?siF?As?SizeF?=?g.MeasureString("我是要計算長度的文字哦~",?Me.Font)

siF.Width 寬度,siF.Height 高度。

如何實現(xiàn)VB.NET文字寬度計算

Dim MyGraphics As Graphics = Me.CreateGraphics

'定義使用的字體

Dim Myfont As New Font("宋體", 9)

'獲取文本的大小。

Dim Mystring_Size As SizeF = MyGraphics.MeasureString("中", Myfont)

'顯示寬和高

MsgBox(Mystring_Size1.Width ":" Mystring_Size1.Height)

VB.net 如何獲得中文字符串的長度?

上面思路是正確的, 用ascw 函數(shù)也可以

private function LenC( ps as string ) as Integer

Dim n As Integer

Dim StrLen As Integer

For n = 1 To Len(Text1.Text)

If Ascw(Mid(Text1.Text, n, 1)) 256 Then

StrLen = StrLen + 2

Else

StrLen = StrLen + 1

Next n

return strLen

end function


分享題目:vb.net取文本寬度 vb文本框高度
本文鏈接:http://www.dlmjj.cn/article/doooioh.html