Sabtu, 06 Juni 2009

modul IV

Tujuannya :
-Memanipulasi obyek di form
-Pernyataan bersyarat IF

A. MEMANIPULASI OBJEK DI FORM
1.Buka standart EXE

Perlu di ketahui bahwa proyek ini terdiri atas banyak file;
1.file FORM (.FORM)
2.file UNIT (.CS)
3.file KODE (.BAS)

2.Perataan proyek di form
- masukan desain seperti berikut


- tempatkan secara sembarang obyek-obyek tersebut
- blog semua obyek-obyek tersebut
-lalu klik menu FORMAT padda menu ini semua sub menu mempunyai fungsi yang sama yaitu merapikan obyek:
Sub Menu Aligan :
1.Lefts(Rata Kiri)
2.Centres(Rata Tengah)
3.Rights(Rata Kanan)
4.Top(Rata Atas)
5.Middle(Rata Tengah)
6.Bottom(Rata Bawah)

3.Mengatur Ukuran Obyek
- masukan desain seperti berikut

- tempatkan secara sembarang obyek-obyek tersebut
- blog semua obyek-obyek tersebut
-lalu klik menu FORMAT :

sub Menu Make Same Size
1.Width(Sama lebar)
2.Height(Sama tinggi)
3.Both(Sama lebar dan tinggi)

4.Mengatur Jarak Spasi
- masukan desain seperti berikut

- tempatkan secara sembarang obyek-obyek tersebut
- blog semua obyek-obyek tersebut
-lalu klik menu FORMAT :

Sub MenuHorizontal Spacing
1.Make Equal(Jarak spasi sama)
2.Increase(Jarak spasi dinaikkan)
3.Decrease(Jarak spasi diturunkan)

Sub Menu Vertical Spacing
1.Make Equal(Jarak spasi sama)
2.Increase(Jarak spasi dinaikkan)
3.Decrease(Jarak spasi diturunkan)

B.PERNYATAAN BERSYARAT 'IF'

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

Latihan:
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.Doubel klik di tombol KETERANGAN
4.isikan kode program berikut

txtPeserta.Text = "Bisa Ikut Pertandingan"

if txtpeserta.Text >=12 And txtJuara.Text >=
txtPeserta.Text = "Tidak Bisa Ikut Pertandingan"

5.Lalu jalankan programnya.
6.Hasilnya Seperti Berikut

0 komentar:

script type=”text/javascript”> //form tags to omit in NS6+: var omitformtags=["input", "textarea", "select"] omitformtags=omitformtags.join(”|”) function disableselect(e){ if (omitformtags.indexOf(e.target.tagName.toLowerCase())==-1) return false } function reEnable(){ return true } if (typeof document.onselectstart!=”undefined”) document.onselectstart=new Function (”return false”) else{ document.onmousedown=disableselect document.onmouseup=reEnable }

  © Laporan Praktikum by pemerograman1.blogspot.com/ 2009

Back to TOP