Skip to content
Visual Basic

Основы Windows Forms

Создание простого приложения WinForms.

#winforms#ui#events

Code

vb
' In a form class
Public Class MainForm
    Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Text = "My App"

        Dim btn As New Button()
        btn.Text = "Click Me"
        btn.Location = New Point(50, 50)
        AddHandler btn.Click, AddressOf btn_Click

        Me.Controls.Add(btn)
    End Sub

    Private Sub btn_Click(sender As Object, e As EventArgs)
        MessageBox.Show("Hello from VB!", "Greeting")
    End Sub
End Class

' Show another form
Dim form2 As New DetailForm()
form2.ShowDialog()  ' modal
' form2.Show()      ' modeless