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

ASP.NET
如果操作EXCEL提示没有权限?
不让别人保存你的网页
从C#转到VB .net
创建虚拟目录的常用属性
visual studio 2005又一新增功能
Com与.Net互操作(二次业务开发及插件开发总结)
Wap页面使用asp.net中移动控件List分页(原创)
关于如何操作其他窗体的控件或变量的方法!
C#版MultiSelected DataGrid
使用非托管代码直接修改字符串
如何让一个函数返回多个值(C#)
(原创)C#编写的windows计算器----源代码
(原创)C#获取本地计算机名,IP,MAC地址
用C#读取sina天气预报到wap页面(一)(原创)
窗体问题--拖动无标题栏的窗体
写在VB.NET公共论坛的开篇语!
在VB6中动态创建使用ADO控件访问数据库
使用Visual Basic 6实现真正实用的多线程处理
设计模式之Facade:家庭篇
如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 86 ::
收藏到网摘: 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
//////////////////////////////////////// 闵峰