ARRANGE
DAN WINDOWSLIST FORM
Apabila anda membaut
aplikasi menggunakan MDIForm, berikut adalah trik bagaimana menyusun form child
dan mengetahui form yang aktif.
1.
Bukalah program Visual Basic dan
mulailah dengan form baru.
2. Tambahkan
sebuah form MDIForm dan dua form standar ke dalam project. Kemudian ubahlah
properties MDIChild menjadi True
pada semua form
standar.
3. Aktifkan kembali MDIForm,
kemudian klik kanan di dalam area form dan klik Menu Editor.
4. Buatlah manu seperti gambar di
bawha ini dengan properties Name
masing – masing sub menjadi susun
dan Index sub menu berurutan dari 0-2 (mulai dari atas). Kemudian pada
menu window beri tanda cek windowLIst
5. Klik ganda di dalam area MDIForm,
kemudian ketiklah perintah di bawah ini untuk menampilkan semua standar.
1
2
3
|
Private
Sub MDIForm_Load()
Form1.Show:
Form2.Show
End
Sub
|
1. Kembali ke tmapilan desain
MDIForm. Klik manu window dan klik slah satu sub menu, kemudian ketiklah
perintah di bawah ini pada prosedur susun_Click.
1
2
3
|
Private
Sub susun_Click(Index As Integer)
Me.Arrange
Index
End
Sub
|
Keterangan Kode
2
|
Perintah
ini akan menyusun form yang berada di dalam MDIForm secara menumpuk, bersusun
atau berjajar sesuai dengan nilai Index. Nilai index dapat anda ubah dengan
nilai vbCascade, vbTitleHorizontal atau vbTitleVertical.
|
Hasilnya saat dijalankan akan tampak seperti gambar dibawah ini
ini lah tutorial untuk membuat form di dalam form pada visual basic, untuk memudahkan teman - teman dalam berkarya membuat program.
EmoticonEmoticon