| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1144 人关注过本帖
标题:有关字体
只看楼主 加入收藏
mthupc
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-10-24
收藏
 问题点数:0 回复次数:0 
有关字体
朋友们,通过下面两段代码,希望能指点兄弟一下:6.0的textheight、textwidth与2005的MeasureString(,)区别在哪儿,为什么二者输出结果值差别这么大?或者各自到底指的是什么?好郁闷!
谢谢了!

vb6.0

Private Sub Command1_Click()
Me.Font.Name = "Arial"
Me.Font.Size = 24
          Me.Font.Bold = True
          Me.ForeColor = vbRed
          Print "Hello   World!"
          Line (0, 0)-(TextWidth("Hello   World!"), TextHeight("Hello   World!")), vbBlack, B
          MsgBox Str(TextHeight("Hello   World!"))
End Sub




vb2005

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim g As System.Drawing.Graphics
        g = Me.CreateGraphics

        Dim TextFont As New System.Drawing.Font("Arial", 24, FontStyle.Bold)
        MsgBox(TextFont.Height.ToString)

        Dim TextBrush As New System.Drawing.SolidBrush(System.Drawing.Color.Red)
        g.DrawString("Hello   World!", TextFont, TextBrush, 10, 10)
        Dim TextSize As New System.Drawing.SizeF
        TextSize = g.MeasureString("Hello   World!", TextFont)
        g.DrawRectangle(Pens.Black, 10, 10, TextSize.Width, TextSize.Height)
        MsgBox(Str(TextSize.Height))
        TextFont.Dispose()
        TextBrush.Dispose()
    End Sub
搜索更多相关主题的帖子: 字体 Hello World Sub 
2008-07-25 22:40
快速回复:有关字体
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015845 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved