国家电网巡线员月收入:在VB6中用Form1.TextWidth 可以求出字符宽,在vb.net里怎么求?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/18 20:12:52

MSDN给出的例子:
Private Sub MeasureStringMin(ByVal e As PaintEventArgs)

' Set up string.
Dim measureString As String = "Measure String"
Dim stringFont As New Font("Arial", 16)

' Measure string.
Dim stringSize As New SizeF
stringSize = e.Graphics.MeasureString(measureString, stringFont)

' Draw rectangle representing size of string.
e.Graphics.DrawRectangle(New Pen(Color.Red, 1), 0.0F, 0.0F, _
stringSize.Width, stringSize.Height)

' Draw string to screen.
e.Graphics.DrawString(measureString, stringFont, Brushes.Black, _
New PointF(0, 0))
End Sub

那就重新安装好了