MATERI PERTEMUAN 2

Pertemuan kali ini kami mempelajari FORM yang dibimbing oleh dosen kami .

* Membuat User Interface (UI)

 

Pengaturan property setiap object-nya adalah sebagai berikut :

Object	Properties	Value
Form2	Caption StartUpPosition	MethodTest 2 – CenterScreen
List1	-	-
Combo1	-	-
Command1	Caption	Add
Command2	Caption	Delete
Command3	Caption	Clear

* MenulisKodeProgram: MethodTest

Pada bagianCode Editor ketikkan kode programnyasebagaiberikut :

PrivateSubForm_Load() Combo1.AddItem"Umar" Combo1.AddItem"Salman" Combo1.AddItem"Halimah" Combo1.AddItem"Shafira"

EndSub

PrivateSubCommand1_Click() List1.AddItemCombo1.Text

EndSub

PrivateSubCommand2_Click() List1.RemoveItemList1.ListIndex

EndSub

PrivateSubCommand3_Click() List1.Clear

EndSub

SimpanForm2(namafile:Lat2.frm).

Cobajalankan Project1 :

9     UntukmenambahisiListBox:pilih“Umar”didalamComboBoxkemudiankliktombolAdd.

Ulangiuntuknama-namayanglainsecaraacak.

9     UntukmenghapussalahsatuisiListBox:pilih“Shafira”didalamListBoxkemudiankliktombol

Delete.

9     UntukmenghapussemuaisiListBox : klik tombolClear.

Penjelasan kode program:

PrivateSubForm_Load() Combo1.AddItem"Umar" Combo1.AddItem"Salman" Combo1.AddItem"Halimah" Combo1.AddItem"Shafira"

EndSub

PadasaatForm2di-load ke dalammemorikomputer, object Combo1 diisidengan beberapa nama.

PrivateSubCommand1_Click() List1.AddItemCombo1.Text

EndSub

Ketikaseorangusermeng-kliktombolAdd(objectCommand1)makaisiobjectList1ditambahsesuai denganisiobject Combo1yang sudah dipilih.

PrivateSubCommand2_Click() List1.RemoveItemList1.ListIndex

EndSub

Ketikaseorangusermeng-kliktombolDelete(objectCommand2)makaisiobjectList1yangdipilih akandihapus.Catatan: bila belumadaisi yang dipilih akan terjadi error.

PrivateSubCommand3_Click() List1.Clear

EndSub

Ketikaseorangusermeng-kliktombolClear(objectCommand3)makasemuaisiobjectList1akan dihapus.

Carapenulisan(syntax)kodeprogramuntukmenggunakanmethoddarisebuahobjectadalahsebagai

berikut :

nama_object.method [argument]

Perhatikan, setelah Anda mengetikkan tanda titik (dot) dibelakang nama_object maka VB 6 akan menampilkan daftar property danmethod yang dimiliki olehnama_object :

Fasilitasini akanmembantu Anda agar tidaksalahmengetikkan nama_objectmaupunmethod-nya. KomponenComboBoxdanListBoxmemilikibeberapamethoduntukmengaturisi(item)didalamnya,

yaitu :

ƒ    AddItem–methodiniakanmenambahisisesuaidenganargumentyangdiberikanberupatulisan.

Setiapkaliadaisiyangditambahkanakandiberikannomerindexsecaraotomatisdimulaidari0 (nol).

Contoh:

Combo1.AddItem “Umar”    Æ“Umar”adalah argumentsebagai isiyangakan ditambahkan

ke dalamobject Combo1.

List1.AddItemCombo1.Text Æproperty Textdari object Combo1adalah argument

sebagaiisi yang akan ditambahkan ke dalamobject List1.

ƒ    RemoveItem–methodiniakanmenghapusisisesuaidenganargumentyangdiberikanberupa nomerindexdariisiyangdipilih.Setiapkaliadaisiyangdihapusmakanomerindexakandisusun ulangsecara otomatis.Bilaisinyatidakada(kosong) nomer index-nya adalah–1.

Contoh:

List1.RemoveItemList1.ListIndexÆpropertyListIndex dariobjectList1adalahargument

sebagainomer index isiyangakan dihapus.

ƒ    Clear–method iniakan menghapussemuaisi(tidakmembutuhkan argument).

Contoh:

List1.Clear Æsemuaisi objectList1akan dihapus.

 

 

 

Menggunakan Event dan Property

* MembuatUserInterface(UI)

AktifkanVB6melalui tombol Start.

MelaluiJendelaPropertiesaturproperty setiapobject sebagaiberikut:

Object	Properties	Value
Form1	Caption StartUpPosition	Property Test 2 – CenterScreen
Label1	Caption	TuliskannamaAnda:
Text1	-	-
Label2	Alignment BackColor Font	2– Center Palette: <putih> Size: 24
Command1	Caption	OK
Command2	Caption	Selesai

* Menulis Kode Program : Property Test

ProgramyangberbasisWindowsbersifatevent-driven,artinyaprogrambekerjaberdasarkaneventyang

terjadipadaobjectdidalamprogramtersebut.Misalnya,jikaseorangusermeng-kliksebuahtombol maka  programakan  memberikan“reaksi”  terhadapeventklik  tersebut.  Programakan  memberikan “reaksi”sesuaidengan kode-kodeprogram yangdibuat untuksuatueventpadaobjecttertentu.

PilihobjectCommand1padabagianObjectSelector.SecaraotomatispadabagianCodeEditorakan muncul blok kode programberikut:

Private Sub Command1_Click() End Sub

EventClickmerupakaneventdefault(standar)dariobjectCommand1,Andabisamelihateventlainnya

pada bagian Event Selector.

Pada bagianCode Editor ketikkan kode programnyasebagaiberikut :

Private Sub Command1_Click() Label2.Caption = Text1.Text

End Sub

Private Sub Command2_Click() End

End Sub

SimpanProject1(namafile:Latihan.vbp)danForm1(namafile:Lat1.frm).VB6akanmenyimpan programyangAndabuatkedalambeberapafileyangsalingterkait,antaralain:fileproject(*.vbp),file form(*.frm)danfilemodule (*.bas).

CobajalankanProject1denganmeng-kliktombolStart(                )padabagianToolbaratautekantombol F5padakeyboard.Ketikkan“Salman”didalamTextBoxkemudiankliktombolOK.Makaakantampil hasil sebagai berikut :

Bila inginkeluarkliktombolSelesai.

Penjelasan kode program :

Berikut diberikan penjelasanbagaimanacarakerja programsederhana di atas

PrivateSubCommand1_Click() Label2.Caption= Text1.Text

EndSub

Ketikaseorangusermeng-kliktombolOK(objectCommand1)makaisitulisanpadaobjectLabel2akan sama  denganisi  tulisanpadaobject  Text1.  PropertyCaptionpada  obyek  Label2  digunakan  untuk menampilkan texttertentu di obyektersebut.

Selanjutnya untuk keluar dariprogramdituliskankodeberikut:

PrivateSubCommand2_Click() End

EndSub