.NET 重绘TabControl

最新推荐文章于 2019-07-05 16:44:04 发布

jackydream

最新推荐文章于 2019-07-05 16:44:04 发布

阅读量4.5k

点赞数

文章标签： .net integer vb.net image class border

本文链接：https://blog.csdn.net/jackydream/article/details/2549421

版权

本文介绍了一种在.NET环境下通过继承TabControl类并重绘来改变其外观的方法。作者参考了CodeProject上的示例代码，并进行了简化，虽然未实现所有功能，但展示了基本的重绘思路。示例提供了VB.NET的代码实现，帮助读者理解如何自定义TabControl的视觉样式。

摘要由CSDN通过智能技术生成

　　　　在www.codeproject.com 看到一个关于重绘tabControl的例了，觉得挺有意思的。照着修改一下,有一些东西自己并没有去改，使得代码很短，同时也有一些功能并没实现的。具休可到http://www.codeproject.com/KB/tabs/flattabcontrol.aspx。

我实现的效果如图：

代码实现

主要是对TabControl实现的重绘,可以通过继承TabControl来重绘。

基本上没什么难度，有兴趣可以试着写一下。

vb.net 代码如下：

Imports System.Drawing

Imports System.Drawing.Drawing2D

Imports System.Collections

Imports System.ComponentModel

Imports System.Collections.Generic

Public Class FlatControl



    Sub New()



        ' 此调用是 Windows 窗体设计器所必需的。

        InitializeComponent()



        ' 在 InitializeComponent() 调用之后添加任何初始化。

        SetStyle(ControlStyles.AllPaintingInWmPaint, True)

        SetStyle(ControlStyles.OptimizedDoubleBuffer, True)

        SetStyle(ControlStyles.StandardDoubleClick, True)

        SetStyle(ControlStyles.ResizeRedraw, True)

        SetStyle(ControlStyles.UserPaint, True)

    End Sub



    Protected Overrides Sub OnPaint(ByVal e As System.Windows.Form