以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]在绘图板中如何写竖行的文字？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=66654)
--  作者：夜雨寒风
--  发布时间：2015/4/11 12:04:00
--  [求助]在绘图板中如何写竖行的文字？
求助，如题，谢谢。
--  作者：Bin
--  发布时间：2015/4/11 12:15:00
--  
Dim p As WinForm.Painter = e.Form.Controls("Painter1")
Dim g As Graphics = p.Graphics
Dim fnt As New Font("宋体",16)
Dim msg As String = "I Like Foxtable"
g.RotateTransform(90)
g.DrawString(msg,fnt,Brushes.Red,10,10)
p.Repaint()