Senin, 25 Mei 2009

Memanipulasi Objek di FORM Visual Basic

Praktek Modul IV
-memanipulasi objek diform
-pernyataan bersyarat IF

A. MEMANIPULASI OBJEK DI FORM
hal yang perlu kita ketahui dulu adalah bahwa proyek itu terdiri atas:
1.file FORM (.FORM)
2.file UNIT (.CS)
3.file KODE (.BAS)
sekarang kita akan memulai proyek,langkah-langkahnya adalah sebagai berikut:
-buka proyek STANDAR.EXE dan klik OK
maka akan terlihat layar form1.
a.1.melakukan perataan objek diform (align)
1.masukan objek seperti desain berikut:
2.objek dapat berupa teks, command, maupun yang lainnya.
3.selanjutnya bila sudah tampak diform objek-objek yang kita buat;
4.silahkan acak posisi dari masing-masing objek,
5.kemudian blok ketiga objek yang telah kita buat, pastikan form1
yang aktif.
6.lakukan dari ujung kiri sampai kekanan bawah sehingga membentuk
segi empat, pastikan ketiga objek terkena blog yang kita lakukan.
contoh seperti gambar:
7.setelah terblok langkah selanjutnya adalah klik menu FORMAT
dan klik sub menu ALIGN maka akan terlihat empat pilihan:
-lefts (membuat objek rata kiri)
-centers (membuat objek berada ditengah)
-rights (membuat objek rata kanan)
-tops (membuat objek berada dibagian atas)
-middles ()
-bottoms (membuat objek berada dibagian bawah)

silahkan dicoba dari masing-masing perintah tersebut.
a.2.mengatur ukuran objek
1.untuk memasukan objek dan memblog objek, lakukan seperti langkah 1-6 diatas.
2.langkah selanjutnya untuk mengatur ukuran objek adalah dengan cara klik menu
FORMAT dan klik sub menu MAKE SAME SIZE, maka akan terlihat empat pilihan:
-width (membuat ukuran lebar objek sama)
-height (membuat ukuran tinggi objek sama)
-both (membuat ukuran lebar dan tingginya sama)

B.PERNYATAAN BERSYARAT 'IF'

pernyataan bersyarat adalah pernyataan yang disususn menguji suatu
ekspresi apakah memenuhi syarat, bila syarat terpenuhi maka pernyataan
dibawahnya akan dikerjakan.

contoh kasus:
pertandingan futsal turnamen sistem informasi '09 memiliki syarat sbb:
1.klub yang ikut minimal memiliki anggota 12 orang.
2.pernah menjadi juara minimal 3 kali.
buatlah program VB untuk menampilkan kalimat, apakah peserta klub bisa mengikuti
lomba atau tidak, dengan rancangan sbb:
3.langkah selanjutnya adalah menggantiakan NAME dari setiap LABEL dan TEXT
-label2 menjadi labelpeserta,
-label3 menjadi labeljuara
-text1 menjadi textpeserta
-text2 menjadi textjuara
-text3 menjadi textket

4.kemudian untuk memasukan kode program lakukan doubel klik pada tombol KETERANGAN
dan tuliskan program berikut:

Private Sub Commandket_Click()
Textket.Text = "MAAF...TIDAK BISA IKUT LOMBA"
If (Textpeserta.Text >= 12) And (Textjuara.Text >= 3) Then
Textket.Text = "SELAMAT...BISA IKUT LOMBA"
End If
End Sub

5.kemudian klik menu RUN dan klik START
6.dan masukan data seperti gambar untuk menguji program..
..SELAMAT MENCOBA..

Tidak ada komentar:

Posting Komentar