Button.UseVisualStyleBackColor : Button « System.Windows.Forms « VB.Net by API

1. VB.Net by API
2. System.Windows.Forms
3. Button

Button.UseVisualStyleBackColor

  
Imports System.Windows.Forms

public class AddButtonAndAddEventHandler
   public Shared Sub Main
        Application.Run(New Form1)
   End Sub
End class


Public Class Form1
    Private Sub ShowTheTime(ByVal sender As System.Object, ByVal e As System.EventArgs)
            Console.WriteLine( Now.ToLongTimeString())

    End Sub

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim dynamicButton As Button
        dynamicButton = New Windows.Forms.Button
        dynamicButton.Location = New System.Drawing.Point(144, 32)
        dynamicButton.Size = New System.Drawing.Size(99, 23)
        dynamicButton.Text = "Get Time"
        dynamicButton.UseVisualStyleBackColor = True
        dynamicButton.TabIndex = 1
        Me.Controls.Add(dynamicButton)

        ' ----- Connect the button to an event handler.
        AddHandler dynamicButton.Click, AddressOf ShowTheTime
    End Sub
End Class


<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
    Inherits System.Windows.Forms.Form
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.SuspendLayout()
        Me.ClientSize = New System.Drawing.Size(260, 76)
        Me.Text = "Dynamic Controls"
        Me.ResumeLayout(False)

    End Sub

End Class

   
    
  

Related examples in the same category