Public Sub F(sender As Object, e As PaintEventArgs) Handles MyBase.Paint
Dim ft As New Font("宋体", 10, FontStyle.Bold, GraphicsUnit.Point)
Dim b As New SolidBrush(Color.Black)
e.Graphics.DrawString("要显示字符串", ft, b, 0, 0)
b.Dispose()
ft.Dispose()
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024