当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体

ASP.NET
在图片上加入图片版权信息
Peer-to-Peer (P2P) communication across middleboxes(翻译4)
今天完成了.net compact framework 加 web service的演练.
Cordbg, Dumpbin, Ildasm, 的一些教程。
asp和asp.net的session共用
VB连接SQL数据库的模块
消除图片在ie中缓存而无法更新的问题
说说使用static和const关键字
怎样解决thephile中的数据库由于排序造成的问题:对 text 数据类型不支持代码页转...
.net分布式事务例子
Internet Explorer 编程简述(二)
使用SqlParameter参数返回值时遇到的问题
vb可不可以实现虚拟中断
C#下Socket对象的BeginReceive方法,执行后竟然不调用AsyncCallback里的回调函数
坚持学asp.net:(十一)
[C#][正则表达式]寻找匹配的Groups的几种方法
面向服务的体系结构概述
Windows Form 和 UserControl
VB中類模塊實現與C++中類實現的比較(1)
下载Oracle数据库中的Blob二进制文件,实例!

ASP.NET 中的 如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 228 ::
收藏到网摘: n/a


刚才在vb.net版块有一位朋友来问这样的问题,在这里做简要的解答。
Private tabArea As Rectangle Private tabTextArea As RectangleF
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.TabControl1.DrawMode = TabDrawMode.OwnerDrawFixed '设置用户绘制方式 Me.TabControl1.Alignment = TabAlignment.Right '设置TAB项右对齐布局 'TabControl1.SizeMode = TabSizeMode.Fixed ‘设置TAB项大小的方式(全都一样大小) 'TabControl1.ItemSize = New Size(150, 20) '设置大小 End Sub
Private Sub TabControl1_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles TabControl1.DrawItem tabArea = TabControl1.GetTabRect(e.Index) '主要是做个转换来获得TAB项的RECTANGELF tabTextArea = RectangleF.op_Implicit(TabControl1.GetTabRect(e.Index)) Dim g As Graphics = e.Graphics Dim sf As New StringFormat() '封装文本布局信息
sf.LineAlignment = StringAlignment.Center sf.Alignment = StringAlignment.Center
Dim p As New Pen(Color.Blue) '绘制边框的画笔 Dim font As New Font("Arial", 10.0F) Dim brush As New SolidBrush(Color.Red)

g.DrawRectangle(p, tabArea) '绘制边框 '绘制文字 g.DrawString(CType(sender, TabControl).TabPages(e.Index).Text, font, brush, tabTextArea, sf) End Sub
//////////////////////////////////////// 闵峰