本文整理汇总了VB.NET中System.Drawing.ToolboxBitmapAttribute类的典型用法代码示例。如果您正苦于以下问题:VB.NET ToolboxBitmapAttribute类的具体用法?VB.NET ToolboxBitmapAttribute怎么用?VB.NET ToolboxBitmapAttribute使用的例子?那么恭喜您, 这里精选的类代码示例或许可以为您提供帮助。
在下文中一共展示了ToolboxBitmapAttribute类的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: New
<System.Drawing.ToolboxBitmap("c:\stop.bmp")> _
Public Class StopSignControl
Inherits System.Windows.Forms.UserControl
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Button1 As System.Windows.Forms.Button
Public Sub New()
MyBase.New()
Me.Label1 = New System.Windows.Forms.Label
Me.Button1 = New System.Windows.Forms.Button
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", _
12.0F, System.Drawing.FontStyle.Regular, _
System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.ForeColor = System.Drawing.Color.Red
Me.Label1.Location = New System.Drawing.Point(24, 56)
Me.Label1.Name = "Label1"
Me.Label1.TabIndex = 0
Me.Label1.Text = "Stop!"
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.Button1.Enabled = False
Me.Button1.Location = New System.Drawing.Point(56, 88)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(40, 32)
Me.Button1.TabIndex = 1
Me.Button1.Text = "stop"
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.Label1)
Me.Name = "StopSignControl"
End Sub
Private Sub StopSignControl_MouseEnter(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.MouseEnter
Label1.Text.ToUpper()
Label1.Font = New System.Drawing.Font(Label1.Font.FontFamily, _
14.0F, System.Drawing.FontStyle.Bold)
Button1.Enabled = True
End Sub
Private Sub StopSignControl_MouseLeave(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.MouseLeave
Label1.Text.ToLower()
Label1.Font = New System.Drawing.Font(Label1.Font.FontFamily, 12.0F, _
System.Drawing.FontStyle.Regular)
Button1.Enabled = False
End Sub
End Class