Selasa, 11 Desember 2012

Tugas 7


Nama : Tika Pradini
NIM   : 11.11.2452
Kelas : TI 11 C
Assalamualaikum wr wb
Contoh MS-Word . dalam satu saat dapat membuka lebih dari 1 file.MDI Form disebut juga sebagai Form Induk yang dapat membuka beberapa form lain secara bersama sama.Form yang di panggil form induk disebut form anak atau MDI Child.
Cara membuat MDI form :
Cara 1
      Atur Properti IsMDIContainer pada form biasa menjadi true
Cara 2
      Tambahkan form baru dan langsung pilih MDI Parent Form
Cara memanggil MDI form : Ketik perintah berikut dari form induk / form utama
                namaform.mdiparent=me
                namaform.show
Berikut contoh soalnya, ada 3 ketentuan :
1.       Buat Child Form untuk ditempatkan pada Parent Form
2.       Buat menu window :
-        Tile Horisontal
-        Tile Vertikal
-        Tile Casecade
3.       Atur posisi toolbar sesuai keinginan

Pertama kita buat form , lihat gambar dibawah ini:
 
Untuk membuat form seperti gambar diatas bisa melalui langkag seperti dibawah ini :
Langkah 1 :
Buat Form dengan tampilan menggunakan Menustrip di Menus and Toolbars.
Langkah 2 :
Setelah Menambah Form, klik atau buka Form1, kemudian pada Properties Menu, cari IsMdiContaint dan ganti menjadi True.
Setelah form1 selesai d atur, sekarang kelangkah selanjutnya mengisi ketentuan seperti diatas.
Langkah 3 :
Membuat ContextMenuStrip pada Menus and Toolbars, buat menu context ada 2.
Yang pertama ditaruh pada form, isi contextnya seperti dibawah ini, dan pada form atur properties ContextMenuStripnya di ganti True.
 
Yang kedua pada groupbox, isi seperti gambar diatas namun angka 1 sampai 5nya di ganti ABCD, dan atur properties ContextMenuStrip pada GroupBoxnya menjadi True.
1.       Buat Child Form untuk ditempatkan pada Parent Form
Yang pertama dilakukan adalah membuat form baru dengan cara :

-          Klik kanan pada WindowsApplication1
-          Plih add
-          Lalu pilih dan klik windows form
-          Lakukan sebanyak 4 kali, maka form akan bertambah 4 seperti dibawah ini :





Tampilan Horisontal:









 Kode program :
Private Sub Latihan1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan1ToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileHorizontal)
        Form2.MdiParent = Me
        Form2.Show()
        Form3.Show()

        Me.LayoutMdi(MdiLayout.TileHorizontal)
    End Sub

-          Tampilan Vertikal













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

        Me.LayoutMdi(MdiLayout.TileVertical)
    End Sub

-          Tampilan Cascade

















Kode program :
Private Sub Latihan3ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Latihan3ToolStripMenuItem.Click
        Form2.MdiParent = Me
        Form2.Show()
        Form3.Show()
        Form4.Show()
        Form5.Show()
        Me.LayoutMdi(MdiLayout.Cascade)
    End Sub

1.       Atur posisi toolbar sesuai keinginan
-          Pilih posisi pada dock sesuai keinginan.
-          Lakukan sama pada tooltrip

5.Menu dengan komponen tambahan
















 





Kode program :
Private Sub KeluarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KeluarToolStripMenuItem1.Click
        If MsgBox("Anda yakin?", vbQuestion + vbYesNo + vbDefaultButton2, "Keluar") = MsgBoxResult.Yes Then Me.Close()
    End Sub

Terima Kasih....
Wasalamualaikum wr.wb












Tidak ada komentar:

Posting Komentar