No title

VISUAL BASIC 6.0

SETYO BUDI, M.KOM

4/18/2014

[email protected]

[email protected]

1

www.cerdas-pintar.blogspot.com

KONSEP PEMROGRAMAN VISUAL BASIC 6.0 • Dalam Pemrograman Beorientasi Object ( OOP ), perlu dipahami istilah sebagai berikut : 1. 2. 3. 4.

Object Property Method Event

2014-04-18

[email protected]

2

[email protected]


KONSEP EVENT DRIVEN PROGRAMMING Method: Maju Mundur Berhenti

Object Mobil

Property : Merek : Toyota Type : Sedan Warna : merah

Event : - Pintu Dibuka - Ditabrak - Didorong 2014-04-18

[email protected]

3

[email protected]


KONSEP EVENT DRIVEN PROGRAMMING Method: - Hide - Move - Show, dll

2014-04-18

[email protected]

Object : Form

Property: - BackColor - BorderStyle

- Caption, dll Event : - Clik -Load -Key Press, dll [email protected]

4


KONSEP EVENT DRIVEN PROGRAMMING • Pada program tradisional (QBasic,Turbo Pascal,Fortran,Cobol ) saat menjalankan, segalanya dijalankan dalam tahapan yang urut. • Setelah tahap pertama, user harus menjalankan tahap kedua, lalu tahap ketiga, dan seterusnya. • User tidak bisa semaunya sendiri, dengan langsung menjalankan tahap ketiga, kelima dan tentu, program tradisional akan susah menangani hal itu. 2014-04-18

[email protected]

5

[email protected]


KONSEP EVENT DRIVEN PROGRAMMING • Pada program yang menganut event driven, konsep program yang urut sudah tidak dikenal lagi. • Saat sebuah program event driven dijalankan, dia mulai dengan menjalankan beberapa inisialisasi (seperti program tradisional juga). • Namun kemudian program tersebut berhenti sama sekali, dan tak melakukan apapun juga, sampai user melakukan sesuatu. Sesuatu vang dilakukan user itu disebut dengan kejadian atau event 2014-04-18

[email protected]

6

[email protected]


CONTOH EVENT

Program yang berbasis Windows bersifat event-driven, artinya program bekerja berdasarkan event yang terjadi pada object di dalam program tersebut. Misalnya, jika seorang user meng-klik sebuah tombol maka program akan memberikan “reaksi”terhadap event klik tersebut. Program akan memberikan “reaksi” sesuai dengan kode-kode program yang dibuat untuk suatu event pada object tertentu. 2014-04-18

[email protected]

7

[email protected]


CONTOH PROGRAM EVENT Pilih object Command1 pada bagian Object Selector. Secara otomatis pada bagian Code Editor akan muncul blok kode program berikut :

2014-04-18

[email protected]

8

[email protected]


CONTOH EVENT Object

Properties

Value

Form1

Caption StartUpPosition

Property Test 2-CennterScreen

Label1

Caption

Tuliskan Kota di Sini

Text1

-

-

Label2

Aligment BackColor

2- Center Paltte:, Size:24

Command1

Caption

OK

Command2

Caption

Selesai

2014-04-18

[email protected]

9

[email protected]


CONTOH EVENT Event Click merupakan event default(standar) dari object Command1, Anda bisa melihat event lainnya pada bagian Event Selector. •

Penjelasan Program Private Sub Command1_Click() Label2.Caption = Text1.Text End Sub Ketika seorang usermeng-klik tombol OK (object Command1) maka isi tulisan pada object Label2 akan sama dengan isi tulisan pada object Text1. Property Caption pada obyek Label2 digunakan untuk menampilkan text tertentu di obyek tersebut. Selanjutnya untuk keluar dari program dituliskan kode berikut : Private Sub Command2_Click() End End Sub Ketika seorang usermeng-klik tombol Selesai (object Command2) maka program akan berhenti. Perintah End digunakan untuk menutup program. 2014-04-18

[email protected]

10

[email protected]


1.Object • Sering dinamakan entitas, merupakan sesuatu yang bisa dibedakan satu sama lainya.

• Sebagai gambaran seluruh benda di dunia ini adalah objek • Pada visual basic yang dimaksud object adalah kontrol (komponen) yang telah disiapkan misalnya : Label, TextBox, ComboBox, ListBox, dll. 2014-04-18

[email protected]

11

[email protected]


2. Property  Dapat dikatakan sebagai attribut, merupakan sesuatu atau ciri-ciri yang menggambarkan suatu objek.  Sebagai contoh

objek Label , maka properti adalah attribut dari label tersebut seperti : Caption, BackColor, BackStyle, Name, Font, ForeColor, dsb.

2014-04-18

[email protected]

12

[email protected]


3. Event • Merupakan aksi atau perbuatan yang bisa dimiliki oleh kontrol (object) sehingga user (programmer)

dapat memakainya untuk memanipulasi sesuatu.

2014-04-18

[email protected]

13

[email protected]


Lanjut....

2014-04-18

[email protected]

14

[email protected]


Lanjut... Pada contoh diatas klik 2 kali pada objek command yang telah diberi value “keluar”, maka akan muncul tulisan seperti dibawah ini : Private Sub Keluar_Click() End Sub 2014-04-18

[email protected]

15

[email protected]


4. Method • Aksi yang dapat dilakukan oleh object • Agar object command berfungsi sebagai tombol yang membuat user keluar dari form tersebut, maka ditambahkan kode program sebagaiberikut:

Private Sub Keluar_Click() end End Sub Dengan menambahkan kode program “end” , maka tombol keluar akan berfungsi sebagaimana mestinya. Ketika tombol keluar di klik, maka use akan keluar dari form yang sedang dibuka. Contoh method yang lain : Additem : menambahkan item Removeitem : menghapus item pada index tertentu Clear : menghapus semua item 2014-04-18

[email protected]

16

[email protected]


PEMROGRAMAN APLIKASI Visual Basic 6.0

Method

[email protected] [email protected]


Method



Method Coba jalankan Project1 : • Untuk menambah isi ListBox : pilih “Umar” di dalam ComboBox kemudian klik tombol Add. • Ulangi untuk nama-nama yang lain secara acak. Untuk menghapus salah satu isi ListBox : pilih “Shafira” di dalam ListBox kemudian klik tombol Delete. • Untuk menghapus semua isi ListBox : klik tombol Clear. [email protected] [email protected]


Method

Cara penulisan (syntax) kode program untuk menggunakan method dari sebuah object adalah sebagai berikut : nama_object.method [argument] Perhatikan, setelah Anda mengetikkan tanda titik (dot) dibelakang nama_object maka VB 6 akan menampilkan daftar property dan method yang dimiliki oleh nama_object



Method



Method Fasilitas ini akan membantu Anda agar tidak salah mengetikkan nama_object maupun method-nya. Komponen ComboBox dan ListBox memiliki beberapa method untuk mengatur isi (item) di dalamnya, yaitu : •ƒ AddItem –> method ini akan menambah isi sesuai dengan argument yang diberikan berupa tulisan. Setiap kali ada isi yang ditambahkan akan diberikan nomer index secara otomatis dimulai dari 0 (nol). [email protected] [email protected]


Method Contoh: Combo1.AddItem “Umar”  “Umar” adalah argument sebagai isi yang akan ditambahkan ke dalam object Combo1. List1.AddItem Combo1.Text  property Text dari object Combo1 adalah argumen sebagai isi yang akan ditambahkan ke dalam object List1. [email protected] [email protected]


Method RemoveItem -> method ini akan menghapus isi sesuai dengan argument yang diberikan berupa nomer index dari isi yang dipilih. Setiap kali ada isi yang dihapus maka nomer index akan disusun ulang secara otomatis. Bila isinya tidak ada (kosong) nomer index-nya adalah –1. Contoh: List1.RemoveItem List1.ListIndex -> property ListIndex dari object List1 adalah argument sebagai nomer index isi yang akan dihapus.



Method

Clear –> method ini akan menghapus semua isi (tidak membutuhkan argument). Contoh: List1.Clear -> semua isi object List1 akan dihapus.



Properties Fungsi Properties adalah menampilkan perlengkapan atau properties dari object yang dipilih atau diklick. Jika ada perubahan dalam object, properties-nya juga ikut berubah.

Object box Sort tabs

Properties list

[email protected]

Object box – menampilkan nama yang akan di atur propertinya. Klik tanda panah di samping kanan object box untuk menampilkan daftar object untuk form yang sedang terpilih. Sort tabs – adalah pilihan urutan daftar property, tersedia dua pilihan yaitu berdasarkan abjad nama depan property dan berdasarkan kategori property Properties List – Daftar property Terdiri atas dua kolom, kolom pertama menampung daftar nama property dan kolom kanan adalah daftar nilai propertinya


Properties Untuk menampilkan Property Windows caranya : 1. Dari Menu View pilihan properties Window

2. Tekan tombol F4. pada keyboard Properties

Keterangan

AutoRedraw

Jika True, Visual Basic secara otomatis menggambar ulang gambar pada form karena windows lain menghilangkan gambar. Jika False ( default ), Visual Basic tidak akan me-redraw secara otomatis.

BackColor

Warna Background form.

BorderStyle

0 tanpa garis batas,1 garis tetap, 2 (default) untuk garis yg ukurannya bisa di ubah, 3 garis tetap dengan dua baris pinggirnya

Caption

Teks yang tampil pada judul form. Nilai Caption secara default adalah nama form

ClipControl

Jika True ( Default), Paint event akan bekerja

ControlBox

Jika True (default), form akan mengandung tombol contro;

Properties DrawMode

Menyediakan 16 komposisi yang terkait dengan property gambar dalam menghasilkan efek gambar khusus.

DrawStyle

Menyediakan 7 komposisi untuk menentukan tanpilan garis dalm gambar

DrawWidth

Menentukan lebar garis pada form

Enabled

Jika True ( default ), form dapat menanggapi Event

FillColor

Warna untuk mengisi gambar pada form

FillStyle

Menyediakan 8 macam corak pengisi bidang gambar

FontBold

Untuk menentukan ukuran tebal font pada form maupun pada saat pencetakan. Tidak berpengaruh pada property Caption

Properties FontItalic

Untuk menentukan bentuk mirin font pada form maupun pada saat pencetakan. Tidak berpengaruh pada property Caption

FontName

Untuk menentukan jenis font pada form maupun pada saat pencetakan. Tidak berpengaruh pada property Caption

FontSize

Untuk menentukan ukuran font pada form dan saat pencetakan. Tidak berpengaruh pada property Caption

FontStrikethru Untuk menentukan garis coret pada font di form meupun pada saat pencetakan. Tidak berpengaruh pada property Caption.

FontTranspare Untuk menghasilkan efek transparan font pada form maupun pada saat pencetakan. Tidak berpengaruh pada property nt Caption FontUnderline Untuk menentukan garis bawah font di form maupun pada saat pencetakan. Tidak berpengaruh pada property Caption

Properties ForeColor

Untuk menrntukan warna latar depan font di form maupun pada saat pencetakan. Tidak berpengaruh pada property Caption

Height

Untuk menentukan ukuran tinggi form

HelpContextI D

Menyediakan nomor pengenal dalam penyusunan contextsensitive help

Icon

Untuk menentukan icon aplikasi

KeyPreview

Jika False (default ), control yang menerima focus bisa menerima event2 berikut: KeyDown,KeyUp,KeyPress sebelum Form. Jika bernilai true form akan menerima event sebelum control terfokus

Left

Ukuran posisi kiri, terhitung dari pinggir kiri form

Properties LinkMode

0 (default) akan melumpuhkan DDE, 1 DDE otomatis DDE, 2DDE terkode, 3 permintaan terkode

LinkTopic

Menentukan aplikasi sumber dan topic DDE

MaxButton

Jika True (default ), tombol maximize muncul pada form pada saat runtime. Jika False, pemakai tidak bisa me-maximise form

MDIChild

Jika True, form adalah jenis MDI, Jika False (default) Form Bukan Form MDI

Name

Nama Form, defaultnya Form1

Properties Picture

File Gambar yang menampilkan background form

ScaleHeight

Tinggi form, ScaleMode untuk menentukan unit pengukuran yang digunakan

ScaleLeft

Jarak dari kiri layer ke batas kiri form

ScaleMode

Untuk menentukan pengukuran koodinat pada form. Anda dapat menentukan di antara delapan pilihan

ScaleTop

Jarak dari sisi atas layer ke batas form

ScaleWidth

Untuk menentukan lebar form

Top

Posisi batas atas form

Properties Visible

Bernilai True atau false, sehingga form bisa tampak atau hilang

Width

Lebar form dalam satuan twip

WindowState

Menunjukkan kondisi starup form pada saat pemakai menjalankan program. Jika bernilai 0 (default), form pertama muncul dalam ukuran sama seperti ukuran desain. Jika bernilai 1, form minimized, nilai 2, maximized

MENGATUR PROPERTI • • • •

• • •

Karakteristik dari sebuah control ditentukan oleh propertinya. Misalnya pada control label yang mempunyai properti Caption. Properti Caption ini menentukan teks apa yang muncul untuk label tersebut, properti Font untuk mengatur jenis huruf dari teks yang muncul. Sedangkan pada control TextBox, untuk mengatur teks yang muncul bukan dengan menggunakan properti Caption, melainkan properti Text. Daftar properti dari sebuah control ada pada properti window. Properti-properti yang ada pada properti window ini akan berubah, sesuai dengan control yang saat itu sedang dipilih. Jika properti window secara tidak sengaja tertutup, Anda dapat menampilkan kembali dengan menekan tombol F4. Anda tidak perlu khawatir bahwa properti tersebut terlalu banyak. Anda bahkan tidak perlu mengubah nilai apapun, jika memang tidak perlu diubah. Kebanyakan saat membuat program, Anda hanya perlu mengubah 1-6 properti untuk setiap control (belum pernah ada programmer yang mengubah semua properti untuk sebuah control). 2014-04-18

[email protected]

34

[email protected]


Properti Left, Top, Widht dam Height • Pada property diatas digunakan untuk mengatur tata letak dari Object atau control yang sudah kita desain di form • Properti Left dan Top digunakan untuk mengatur seberapa jauh posisi control terhadapa batas kiri dan batas atas dari wadah di mana control tersebut berada. • Untuk TextBox yang diletakkan pada form, maka batas kiri dan batas atas yang menjadi patokan adalah adalah pojok kiri atas form. Sedangkan untuk control yang diletakkan di dalam sebuah frame, maka batas kiri dan atas yang menjadi patokan adalah frame tersebut. • Properti Width dan Height menentukan panjang dan lebar suatu control. Satuan yang digunakan adalah satuan twips. • Satuan twips merupakan satuan yang tidak tergantung dari resolusi layar.

[email protected], [email protected]


PROPERTI Top

Top

Height

Left

Left


Width


PROPERTI Contoh : Program Left, Top, Widht dan Hight Private Sub Form_Activate() Form1.Width = 8000 Form1.Left = 0 Form1.Top = 0 End Sub



1.Properti ForeColor dan BackColor Property ini digunakan untuk mengatur tampilan warna ForeColor ini digunakan untuk mengatur tampilan warna tulisan BackColor digunakan untuk mengatur Warna latar belakang dari control



Properti ForeColor dan BackColor Contoh Program memberi warna Private Sub Form_Load() Form1.BackColor = &HFFFF00 Label1.ForeColor = vbRed End Sub



Properti Font Properti ini digunakan untuk mengatur jenis huruf, style huruf, ukuran huruf dll sesuai jenis fasilitas di yang ada di property font ini Contoh Program memberi Font Private Sub Form_Load() Label1.FontName = "ARIAL" Label1.FontSize = 16 Label1.FontUnderline = True End Sub



Properti Caption dan Text Properti Caption dan Text nampak serupa, tapi pengoperasian keduanya sangat berbeda.

Caption adalah teks yang muncul pada sebuah control. Properti caption tidak dapat diubah oleh user, saat program berjalan Properti text juga merupakan teks yang muncul, namun user dapat mengubah

properti ini saat program berjalan. Properti caption ini digunakan pada control Form, Label, CommandButton, CheckBox, OptionButton, Data dan Frame (yang mana user tidak perlu mengubah teks yang ada pada control tersebut). Sedangkan

properti Text digunakan pada TextBox, ListBox, dan ComboBox. Pada properti Caption dikenal karakter & (ampersand) untuk memberikan garis bawah pada karakter sesudah &.



Properti Caption dan Text

Caption


Text


Properti Enabled dan Visible Properti Enabled dan Visible ini hanya mempunyai dua nilai, yaitu True dan False. Standarnya, kedua properti ini selalu bernilai True. Properti Enabled adalah suatu fungsi yang memungkinkan untuk aktif dan pasif Jika Enabled bernilai True, berarti kontrol tersebut dapat diakses Jika Enabled bernilai False, berarti kontrol tersebut tidak dapat diakses Properti Visible adalah suatu fungsi yang memungkinkan untuk tampil dan tidak Jika Visibled bernilai True, berarti kontrol tersebut ditampilkan Jika Visibled bernilai False, berarti kontrol tersebut tidak ditampilkan



Properti Enabled dan Visible Mengubah properti Enabled dan Visible tidak harus dilakukan lewat properti Window. Anda bisa mengubahnya lewat kode. Contoh: Private Sub Command1_Click() Text1.Enabled = True Text2.Enabled = True Shape1.Visible = True End Sub

Private Sub Form_Load() Text1.Enabled = False Text2.Enabled = False Shape1.Visible = False End Sub [email protected], [email protected]


Properti MousePointer dan MouseIcon Properti Mouse Pointer digunakan untuk mengatur bentuk mouse saat melewati suatu control. Properti ini juga dapat digunakan untuk mengatur bentuk mouse pada waktu tertentu. Misalnya pada saat proses yang membutuhkan waktu lama, Anda dapat mengubah pointer

Untuk mengubah properti mousepointer dalam kode program Private Sub Command1_Click() Screen.MousePointer = vbHourglass End Sub Private Sub Command2_Click() Screen.MousePointer = vbDefault End Sub



Properti MousePointer dan MouseIcon Properti mouse icon digunakan untuk menampilkan bentuk pointer mouse secara spesifik Pada kasus ini, Anda harus mengubah properti raousepointer menjadi 99 (vbCustom), lalu memilih file untuk bentuk pointer mouse. VB telah menyediakan bentuk-bentuk pointer mouse pada folder Graphics/Icons.

Private Sub Command3_Click() MousePointer = vbCustom MouseIcon = LoadPicture("D:\setyo\BOOK01B.ICO") End Sub



PENGERTIAN EVENT  VB adalah pemrograman yang bersifat event driven. Semua aksi dijalankan karena ada sebuah event yang memicunya

 Sebuah event dapat terjadi karena banyak hal, misalnya ketika mouse digerakkan, mouse diklik, form ditampilkan, form ditutup, atau penekanan tombol. Semua event yang terjadi tersebut ditangkap oleh VB, dan programmer segera membuat kode-kode untuk mengerjakan apa yang perlu dijalankan, ketika

event tersebut terjadi.



PENGERTIAN EVENT • Programmer tidak perlu mencegat semua event yang terjadi. Cukup event-event yang memang perlu untuk dicegat. • Event ini hanya terjadi pada saat program dijalankan.

Sedangkan pencegatan (atau pengetikkan kode program) dilakukan pada design time, yaitu pada code window



MENGATUR PROPERTI

Object Selector

Property and Value List

Property Description 2014-04-18

[email protected]

49

[email protected]


MENGATUR PROPERTI • Untuk control Textbox, Anda dapaf mengosongkan semua properti Text. • Sedangkan untuk control CommandButton, ubah properti Caption menjadi &TAMBAH. • Tanda ampersand (&) di awal huruf T, membuat huruf T di garis bawah. • Seperti aplikasi Windows lainnya, huruf yang di garis bawah merupakan shortcut. 2014-04-18

[email protected]

50

[email protected]


MEMBERI NAMA CONTROL • •

• •

• •

Properti Name adalah properti yang penting pada setiap Control/object ( entah itu text box,command button,label,combo box, dll) Properti Name berupa teks yang tidak boleh dikosongkan. Tujuan dari properti ini adalah untuk identifikasi, pada saat mcngetikkan kode-kode program Saat Anda meletakkan control ke dalam form, Visual Basic memberi nama default untuk control tersebut. Misalnya label pertama yang Anda letakkan, akan diberi nama Label1 (pada properti Name), label kedua akan diberi nama Label2, label ketiga akan diberi nama Label3, dan seterusnya. Sama juga untuk control yang lain Karena keperluan dari penamaan ini adalah untuk pengkodean, maka sangat baik jika Anda memberi nama yang mudah diingat. Microsoft menyarankan bahwa tiga huruf pertama dari nama suatu control merupakan identitas jenis control tersebut. Ini bukan keharusan, tapi demi mempermudah pengkodean pada saat pemrograman.

2014-04-18

[email protected]

51

[email protected]


MEMBERI NAMA CONTROL Control

Awalan

Control

Awalan

CommandButton

Cmd

Data

Dat

TextBox

Txt

HscrollBar

Hsb

Label

Lbl

VscrollBar

Vsb

PictureBox

Pic

DriveListBox

Drv

CheckBox

Chk

DirListBox

Dir

ComboBox

Cbo

FileListBox

Fil

Timer

Tmr

Line

Lin

Frame

Frm

Shape

Shp

OptionButton

Opt

Form

frm

2014-04-18

[email protected]

52

[email protected]


MEMBERI NAMA CONTROL

Tempat pemberian Nama control

2014-04-18

[email protected]

53

[email protected]


MENGATUR TAB INDEX / TAB ORDER • Tab Index / Tab Order adalah berfungsi untuk menempatkan atau mengatur urut-urutan dalam mengunjungi setiap control. • Standar dari Windows memungkinkan Anda untuk mengunjungi setiap control yang ada pada form, dengan menggunakan tombol Tab. • Umumnya, penekanan tombol Tab akan mengakibatkan fokus berpindah ke control yang berada di bawah atau di samping kanan, sedangkan penekanan Shift+Tab akan mengembalikan fokus ke control sebelumnya. • Istilah untuk urutan tab dari control ini adalah Tab Order. 2014-04-18

[email protected]

54

[email protected]


MENGATUR TAB INDEX / TAB ORDER

TabIndex

2014-04-18

[email protected]

55

[email protected]


Event • Event merupakan suatu kejadian yg menimpa suatu objek. • Suatu objek atau komponen pada visual basic memiliki mekanisme untuk merespon suatu event bergantung pada jenis event yang dikenakan. • Misalnya komponen Command Button merespons event onClick yakni apabila komponen button di klik. • Event clik terjadi ketika pemakai (user) melakukan klik pada tombol kiri mouse pada command1 Contoh Untuk mouse Click Doubleclik, dll Contoh event untuk keyboard Keypress Keydown keyup 2014-04-18

[email protected]

56

[email protected]

www.cerdas-pintar.blogspot.comm

CONTOH EVENT DI VB 6.0 Activate

Terjadi saat sebuah form menjadi windows aktif

Clik

Terjadi saat pemakai mengklik form

DblClik

Terjadi saat pemakai melakukan klik ganda form

Deactivate Terjadi saat sebut window, tidak lagi menjadi window aktif Gotfocus dan Setfocus

Terjadi sewaktu sebuah object ( dapat berupa button,input teks, tab control ) terfocus atau kehilangan Focus

KeyDown Terjadi menekan sebuah tombol yang di tekan atau dan KeyUp setelah dilepas 2014-04-18

[email protected]

57

[email protected]


CONTOH EVENT DI VB 6.0 KeyPress

Terjadi pada saat pemakai menekan sebuah tombol pada keyboard melewati form MouseDown Terjadi saat button pada mouse ditekan ( ditahan ) atau atau dilepas ( setelah ditekan ) MouseUp MouseMove Terjadi saat user menggerakkan mouse Resize Terjadi saat user mengubah ukuran sebuah objek ( dapat berupa form ) Load Terjadi pada saat form diaktifkan dan sebelum tampak di layer LostFocus Terjadi pada saat form kehilangan focus 2014-04-18

[email protected]

58

[email protected]


Pengertian Event Control


Event yang di cegat


JENIS-JENIS EVENT Event Click dan DblClick Event Click terjadi ketika user mengklik kiri, dan event double klik terjadi ketika user melakukan double klik pada sebuah control (bisa CommandButton, Form, OptionButton, CheckBox, dan sebagainya).



JENIS-JENIS EVENT Event Change adalah event yang paling sederhana. Event Change terpicu jika isi dari suatu control berubah. Misalnya user menghapus isi TextBox, atau user mengubah ComboBox. Tapi ada perkecualian untuk control CheckBox dan OptionButton. Jika terjadi perubahan nilai, maka event yang dipanggil adalah event Click (bukan event Change). Event ini juga dapat dipicu, jika ada kode program yang mengubah nilai dari suatu control. Contoh: Textl.Text = ” " Walaupun kode tersebut hanya mengosongkan nilai dari properti Text, tapi kode tersebut telah memicu event Change.



Event GotFocus dan Lostfocus Event GotFocus dipicu ketika sebuah control menerima fokus, Event LostFocus dipicu ketika sebuah control kehilangan fokus. Misalkan Anda mempunyai dua buah textbox dengan Tablndex masing masing 0 dan 1. Ketika program kali pertama dijalankan, TextBox pertama (yang mempunyai Tablndex 0) akan memicu event GotFocus.

Saat user menekan tombol Tab, dan kursor berpindah pada control TextBox di bawahnya, maka event LostFocus akan terjadi untuk control dari TextBox yang pertama, dan event GotFocus akan terjadi untuk control dari TextBox yang kedua. [email protected], [email protected]


Event KeyPress, KeyDown, dan KeyUp Event KeyPress – terjadi ketika tombol-tombol yang mempunyai kode ASCII pada keyboard ditekan Event KeyDown – terjadi ketika setiap tombol pada keyboard ditekan. Event KeyUp – terjadi ketika setiap tombol pada keyboard dilepas



Event KeyPress, KeyDown, dan KeyUp Contoh Key Press Private Sub Form1_KeyPress (KeyAscii As Integer) MsgBox “Kode ASCII tombol yang ditekan : “ & KeyAscii End Sub Private Sub Form1_KeyDown(KeyCode As Integer, Shift As Integer) MsgBox “Kode tombol yang ditekan : “ & KeyCode End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) MsgBox “Kode tombol yang dilepas : “ & KeyCode End if



Event MouseDown, MouseUp dan MouseMove Event-event ini terjadi saat terjadi operasi pada mouse, seperti perubahan posisi mouse, penekanan tombol mouse, dan pelepasan tombol mouse. Ketiga event ini menerima parameter yang sama, yaitu: status tombol mouse (ditekan atau tidak), status Shift, Ctrl dan Alt, serta posisi koordinat X dan Y dari kursor mouse. Koordinat yang dihasilkan relatif terhadap posisi pojok kiri form.

Berikut adalah contoh program yang memanfaatkan event MouseDown, MouseUp dan MouseMove untuk memantau klik yang dilakukan, serta koordinat dari kursor



Event MouseDown, MouseUp dan MouseMove Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) MouseDesc Button, Shift, X, Y End Sub Private Sub MouseDesc(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim desc As String desc = String$(20, " ") If Button And vbLeftButton Then Mid$(desc, 1, 1) = "L" If Button And vbRightButton Then Mid$(desc, 3, 1) = "R" If Button And vbMiddleButton Then Mid$(desc, 2, 1) = "M" If Button And vbShiftMask Then Mid$(desc, 5, 5) = "Shift" If Button And vbCtrlMask Then Mid$(desc, 11, 4) = "Ctrl" If Button And vbAltMask Then Mid$(desc, 16, 3) = "Alt" desc = " (" & X & " , " & Y & ")" & desc Label1.Caption = desc Debug.Print desc End Sub [email protected], [email protected]


Event MouseDown, MouseUp dan MouseMove Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) MouseDesc Button, Shift, X, Y End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) MouseDesc Button, Shift, X, Y End Sub



No title

Recommend Documents