日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

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

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
如何實(shí)現(xiàn)VB.NET文字寬度計(jì)算

VB.NET開(kāi)發(fā)工具為我們帶來(lái)了非常大的驚喜。各種新的功能特點(diǎn)大大吸引了開(kāi)發(fā)人員的眼球。下面我們就可以通過(guò)一段對(duì)于VB.NET文字寬度計(jì)算的代碼實(shí)現(xiàn)方式來(lái)對(duì)此進(jìn)行深入的解讀，了解其應(yīng)用技巧。#t#

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶，將通過(guò)不懈努力成為客戶在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴，公司提供的服務(wù)項(xiàng)目有：域名注冊(cè)、虛擬空間、營(yíng)銷軟件、網(wǎng)站建設(shè)、伊寧網(wǎng)站維護(hù)、網(wǎng)站推廣。

VB.NET文字寬度計(jì)算的代碼示例：

  1. '被表示的文字列  
  2. Dim s As String = 
    "我是全哥，歡迎！" 
  3. 'PictureBox1的Graphics對(duì)象取得  
  4. Dim g As Graphics = 
    PictureBox1.CreateGraphics()  
  5. '字體對(duì)象作成  
  6. Dim fnt As New Font("宋體", 20)  
  7. 'StringFormat對(duì)象作成  
  8. Dim sf As New StringFormat 

  1. '描繪文字列  
  2. g.DrawString(s, fnt, Brushes.Black, 
    0, 0, sf)  
  3. '設(shè)定寬度為1000像素，文字列描繪時(shí)計(jì)算大小  
  4. Dim stringSize As SizeF = 
    g.MeasureString(s, fnt, 1000, sf)  
  5. '取得的文字列的大小使用矩形描繪  
  6. g.DrawRectangle(Pens.Red, 0, 0, 
    stringSize.Width, stringSize.Height) 

 
 
 
      
  
  
  1. '測(cè)量"BINGNING"和"NET"的大小  
    2.   
  
  
  2. '測(cè)量指定文字列的范圍  
    3.   
  
  
  3. Dim characterRanges As 
    CharacterRange() = _  
    4.   
  
  
  4. {New CharacterRange(0, 4),
     New CharacterRange(5, 3)}  
    5.   
  
  
  5. sf.SetMeasurableCharacterRanges
    (characterRanges)  
    6.   
  
  
  6. '指定描繪文字列的矩形  
    7.   
  
  
  7. Dim layoutRect As New 
    RectangleF(0, 0, 500, 100)  
    8.   
  
  
  8. '取得Region數(shù)組  
    9.   
  
  
  9. Dim stringRegions As Region() = _  
    10.   
  
  
  10. g.MeasureCharacterRanges(s, 
    fnt, layoutRect, sf)  
    11.   
  
  
  11. '描繪取得文字列大小的矩形  
    12.   
  
  
  12. Dim rect1 As RectangleF = 
    stringRegions(0).GetBounds(g)  
    13.   
  
  
  13. g.DrawRectangle(Pens.Yellow, 
    Rectangle.Round(rect1))  
    14.   
  
  
  14. Dim rect2 As RectangleF = 
    stringRegions(1).GetBounds(g)  
    15.   
  
  
  15. g.DrawRectangle(Pens.Blue, 
    Rectangle.Round(rect2))  
    16.   
  
  
  16. '資源釋放  
    17.   
  
  
  17. fnt.Dispose()  
    18.   
  
  
  18. g.Dispose() 
    19.

VB.NET文字寬度計(jì)算相關(guān)操作方法就為大家介紹到這里。


新聞名稱：如何實(shí)現(xiàn)VB.NET文字寬度計(jì)算
當(dāng)前地址：http://www.5511xx.com/article/cdcjgpp.html