最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
从头创建 Visual Basic .NET 控件 (七)
时间：2022-07-02 11:59:55 编辑：袖梨 来源：一聚教程网
第 6 步：清理
为了使控件顺利地运作，我们还需要执行一些其他操作。例如，大小改变时需要重新绘制控件。而且，为了不改变控件的比例，我们需要检测影响大小的属性发生更改的时间，然后强制宽度等于高度的三分之一。下面是完成这两项任务的事件处理程序：
Private Sub TrafficLight_Resize(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Resize
Me.Invalidate()
End Sub
Private Sub TrafficLight_Layout(ByVal sender As Object, _
ByVal e As System.Windows.Forms.LayoutEventArgs) _
Handles MyBase.Layout
Select Case e.AffectedProperty
Case "Bounds"
Me.C:Program FilesMicrosoft Visual Studio
.NETCommon7GraphicsiconsTrafficTRFFC09.ICO")> _
注意：所有内容都应在一行中。为了便于阅读，我们在 Studio 后放置了一个回车。粘贴该代码时，要确保它们位于一行中，Studio 和 .NET 之间只需一个空格，并删除回车。如果您已经将 Visual Studio .NET 安装到其默认位置，那么上述代码将用 Visual Studio 目录中的图标设置该特性。如果您没有将 Visual Studio .NET 安装到其默认位置，则需要相应地更改图标的路径名。
为了使控件顺利地运作，我们还需要执行一些其他操作。例如，大小改变时需要重新绘制控件。而且，为了不改变控件的比例，我们需要检测影响大小的属性发生更改的时间，然后强制宽度等于高度的三分之一。下面是完成这两项任务的事件处理程序：
Private Sub TrafficLight_Resize(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Resize
Me.Invalidate()
End Sub
Private Sub TrafficLight_Layout(ByVal sender As Object, _
ByVal e As System.Windows.Forms.LayoutEventArgs) _
Handles MyBase.Layout
Select Case e.AffectedProperty
Case "Bounds"
Me.C:Program FilesMicrosoft Visual Studio
.NETCommon7GraphicsiconsTrafficTRFFC09.ICO")> _
注意：所有内容都应在一行中。为了便于阅读，我们在 Studio 后放置了一个回车。粘贴该代码时，要确保它们位于一行中，Studio 和 .NET 之间只需一个空格，并删除回车。如果您已经将 Visual Studio .NET 安装到其默认位置，那么上述代码将用 Visual Studio 目录中的图标设置该特性。如果您没有将 Visual Studio .NET 安装到其默认位置，则需要相应地更改图标的路径名。
相关文章
- 蚂蚁庄园今日课堂答题2024年11月14日 11-16
- 《尼尔：机械纪元》武器黑之倨傲属性及特殊能力介绍 11-15
- 《尼尔：机械纪元》机械生命体的枪获得方法介绍 11-15
- 《尼尔：机械纪元》武器机械生命体的枪属性及特殊能力介绍 11-15
- 《尼尔：机械纪元》天使之圣翼获得方法介绍 11-15
- 《尼尔：机械纪元》武器天使之圣翼属性及特殊能力介绍 11-15