繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体
- ASP.NET
- ASP.NET编程中的十大技巧
- ASP.NET常用函数(推荐)
- ASP.NET上传图片并生成可带版权信息的缩略图
- 用javascript打造搜索工具栏
- ASP.NET中动态控制RDLC报表
- 用ASP.NET还原与恢复Sql server
- 在ASP.NET里得到网站的域名
- Asp.net中的mail的发送
- 用ASP.Net实现文件的在线压缩和解压缩
- ASP.NET中文件上传下载方法集合
- ASP.NET通过Remoting service上传文件
- ASP.NET2.0服务器控件之Render方法
- ASP.NET2.0新特性概述
- asp.net2.0如何加密数据库联接字符串
- 用.NET 2.0压缩/解压功能处理大型数据
- ASP.NET入门随想之检票的老太太
- ASP与ASP.NET互通COOKIES的一点经验
- ASP.NET2.0数据库入门之SqlDataSource
- ASP.NET2.0数据库入门之SQL Server
- ASP.NET 2.0下的条件编译
ASP.NET 中的 如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 194 ::
收藏到网摘: 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
//////////////////////////////////////// 闵峰
评论 (0) All
