Aplikasi Windows Lanjut Visual Basic

A.    Materi

1.      Menu

Keberadaan menu memungkinkan pemakai akhir untuk mengakses perintah-perintah dan fungsi-fungsi level atas dalam antarmuka yang familiar dan mudah dipahami.

Di Windows Form, menu utama direpresentasikan oleh objek MenuStrip (atau   MainMenu).  Menu ini berperan sebagai container yang nantinya akan menampung item-item menu dalam struktur menu.

2.      Menu PopUp

Selain dalam bentuk menu bar, menu juga dapat diwujudkan sebagai Popup. Jenis menu ini umumnya memerlukan pemicu, misalnya klik kanan agar dapat ditampilkan.

3.      Tool Bar

Pada umumnya, tool bar menyediakan akses ke fitur-fitur dengan frekuensi penggunaan cukup tinggi yang juga dapat diakses melalui menu.

Di Windows Form, tool bar direpresentasikan oleh objek ToolBar, dan button-button di dalamnya direpresentasikan oleh objek ToolBarButton.

4.      MDI

Pada saat membuat aplikasi Windows, kita dapat menggunakan style aplikasi  single-document interface (SDI) atau multiple-document interface  (MDI).

MDI menyediakan metodologi untuk menghasilkan antarmuka “document-centric”. Salah satu keuntungan dari MDI adalah mereduksi clutter dan meningkatkan efisiensi penggunaan ruang layar.

B.     Evaluasi

Gambar 1 Form pulldown

Membuat Form seperti diatas dengan  menu pull down

Syntax

Public Class Form1

    Private Sub menuCut_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuCut.Click

        If RichTextBox1.SelectedText <> " " Then

            RichTextBox1.Cut()

        End If

    End Sub

    Private Sub menuCopy_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuCopy.Click

        If RichTextBox1.SelectedText <> " " Then

            RichTextBox1.Copy()

        End If

    End Sub

    Private Sub menuPaste_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuPaste.Click

        RichTextBox1.Paste()

    End Sub

    Private Sub menuAll_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuAll.Click

        RichTextBox1.SelectAll()

    End Sub

    Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click

        End

    End Sub

End Class