- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]GDI绘图，怎么给图形框内加上文字？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29139)
-- 发布时间：2013/2/28 15:15:00
-- [求助]GDI绘图，怎么给图形框内加上文字？
如题，附上案例；求解？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:gdi绘图.table |
-- 发布时间：2013/2/28 15:32:00
--
Dim P As WinForm.Painter = e.Form.Controls("Painter1")
Dim G As Graphics = P.Graphics
Dim N As New pen(color.blue , 2)
Dim fnt As New Font("宋体",10)
g.DrawRectangle(n,50,50,100,50)
g.DrawString("fox",fnt,Brushes.Red,50,50)
p.Repaint()