Minggu, 09 Desember 2012

Tugas 7 Visual Basic



Tugas 7
MDI FORM
Menyusun form secara Horisontal, Vertikal, Cascade

c Membuat form MDI dengan 4 form anak
Buat desain seperti dibawah ini dengan menggunakan MenuStrip


Untuk menampilkan form dengan cara memanggil form tsb dengan menu (toolstripmenuitem), dobel klik menu/label trsbut hingga muncul jendela untuk mengetikan kode, untuk menampilkan form tersebut ketikan kode pada masing-masing menu atau isi dari toolstripmenuitem tersebut (show form 1, 2, 3, dan form 4)

Private Sub Latihan1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan1ToolStripMenuItem.Click
        Form2.MdiParent = Me
        Form2.Show()
    End Sub

    Private Sub Latihan2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan2ToolStripMenuItem.Click
        Form3.MdiParent = Me
        Form3.Show()
    End Sub

    Private Sub Latihan3ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan3ToolStripMenuItem.Click
        Form4.MdiParent = Me
        Form4.Show()
    End Sub

    Private Sub Latihan4ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan4ToolStripMenuItem.Click
        Form5.MdiParent = Me
        Form5.Show()
    End Sub

Langkah selanjutnya ialah membuat menu Windows sebagai menu untuk melakukan penyusunan form, buatlah seperti di bawah ini dengan menggunakan MenuStrip

 

Ketikan kode berikut pada masing-masing menu (Cascade, Vertikal, dan Horisontal)

Private Sub CascadeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CascadeToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.Cascade)
    End Sub

    Private Sub VerticalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VerticalToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileVertical)
    End Sub

    Private Sub HorizontalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HorizontalToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileHorizontal)
    End Sub

c Menu Windows ( Cascade, Vertikal, dan Horisontal )
Atur IsMdiContainer pada form1 diganti menjadi “True” agar form 1 dapat menampilkan beberapa form didalamnya. Jika sudah, kita jalankan program dan untuk tampilan awal hanya tampil form 1 dengan kondisi masih kosong didalamnya, seperti berikut ini


Agar menu windows seperti cascade, vertical dan horizontal maka terlebih dahulu harus panggil beberapa form agar dapat melakukan penyusunan, missal kita panggil 3 form didalamnya, lihat gambar berikut


Masuk ke menu windows lalu pilih cascade, horizontal dan vertical tetapi pilih satu per satu maka tampilannya sebagai berikut

 


 
c Membuat menu tambahan
Untuk menambahkan standar menu seperti program pada umumnya, disini kita juga dapat menambahkan menu tersebut dengan mengeksplor tanda segitiga yang ada disamping kanan dari menu Toolstrip, kemudian kita pilih “Insert Standard Items”. Maka akan muncul menu standar seperti pada gambar berikut

 

c Mengatur posisi sesuai keinginan
Mengatur posisi menu agar menjadi diatas atau dibawah caranya adalah dengan menaruh kursor pada MenuStrip lalu klik kanan pada MenuStrip lalu pilih Send To Back / Bring to font. seperti pada gambar berikut

atau juga klik pada anak panah yang dibagian menu maka akan muncul MenuStrip Tasks kemudian pada dock plih sesuka kalian misal plih left maka hasilnya sebagai berikut

 

Tidak ada komentar:

Posting Komentar