Blog ini hanya dibuat untuk kepentingan perkuliahan dan tidak untuk di isi dengan hal yang tidak berkaitan dengan Teknik Komputer
Sabtu, 31 Oktober 2009
Sabtu, 24 Oktober 2009
Cara Membobol Windows Xp
Membobol Log-on windows xp
Sebenarnya, untuk membobol password log on pada Windows XP tidak diperlukan software khusus. Ada cara yang sangat sederhana untuk melakukannya. Kita hanya pelu melakukan langkah-langkah sebagai berikut:
- Hidupkan komputer.
- Jika sudah, tekan F8. Maka akan masuk ke mode select. pilih safe mode, lalu tunggu beberapa saat.
- Tekan Ctrl + Alt + Del Maka akan muncul form Log on dan Password.
- Isi log on dengan Administrator dan masukkan password semau anda.
- Jika telah melakukan hal di atas, restart kembali komputer anda.
- Pilihlah start in normaly windows.
- Tekan kembali Ctrl + Alt + Del .
- Ketikkan nama logonnya Administrator terus password yang baru anda ubah tadi.
Kalaucara diatas masih kurang manjur, masih ada cara cadangan:
- Hidupkan komputer, lalu masuk ke safe mode (tekan F8 saat booting),
- Masuk ke System dengan akun yang tidak terpassword, bisa Guest atau akun lain,
- Klik Start – Control Panel – Account Setting,
- Pilih account Administrator, maka anda akan melihat pilihan Remove Password …
- Silakan dilanjutkan
Demikian. Semoga berguna dan bermanfaat.
Membobol windows xp/vista
Akhirnya…. Artikel pertama mengenai hacking & cracking. Habis bingung sih mau nulis apa. Mana komputer pribadi saya rusak. Jadi sekarang saya pakai komputer kakak saya deh. Dan saya mau mencoba-coba disini.
Sekarang ini yang namanya membobol password OS keluarga Windows itu mudah. Bahkan Windows Vista yang diklaim Microsoft dibutuhkan bertahun-tahun dalam pengembangan keamanannya bisa ditembus dengan mudah.
Ingat disini saya pakai kata ”membobol”. Bukan meng-”crack” atau ”mengetahui”. Jadi maksudnya kita akan menerobos keamanan password. Tapi kita tidak akan mengetahui password-nya. Kalau ingin mengcrack password tidak cukup hanya waktu 5 menit (tergantung kerumitan password sih).
Trik ini bekerja di lingkungan Windows NT/2000/XP/Vista dan sepertinya bekerja di segala service pack yang sekarang beredar.
Apa yang kita butuhkan? Tentunya tidak bisa dengan tangan kosong kalau 5 menit (kecuali dengan social engineering kali ya). Download dulu sebuah file ISO bernama chntpw yang dibuat oleh seorang analis sekuriti Peter Hagen. Download disini. Download yang versi terakhir. Disini saya menggunakan versi 2008-08-02.
File ISO adalah sebuah image file yang isinya merupakan isi dari sebuah CD. Selanjutnya kita harus burn isi dari file ISO ke sebuah CD. Caranya ya dengan aplikasi yang sudah mendukungnya seperti Nero. Tetapi kalau tidak punya download aja tool Free ISO Burner di http://www.freedownloadscenter.com/Utilities/Misc__Utilities/Free_ISO_Burner.html
Selain bisa diburn ke CD program Chntpw juga bisa diinstall ke Flash Disk sehingga Flash Disk tersebut menjadi bootable. Caranya? Burn dulu file ISO ke CD. Lalu copy semua file dari CD tersebut ke Flash Disk (jangan copy ke folder). Setelah itu jalankan Command Prompt.
Lihat nama drive di Flash Disk kalian. Misalnya Flash Disk tersebut berada di drive E:. Maka ketikkan “e:” lalu enter.
Setelah itu ketikkan “syslinux.exe -ma %driveFD%”. Ganti tulisan %driveFD% dengan nama drive Flash Disk kalian. Karena disini di komputer saya FD terdeteksi sebagai drive E maka saya akan mengetikkan “syslinux.exe -ma e:”. Setelah itu Flash Disk sudah bisa dipakai untuk booting chntpw.
Setelah itu bawalah CD/Flash Disk dibawa komputer korban. Disini saya akan memakai sebuah komputer dengan Windows XP SP 2 (komputer kakak saya). Tadinya saya mau coba Windows Vista tapi komputer yang ada Windows Vista-nya lagi rusak. Saya akan menjebol sebuah akun bernama Test dan passwordnya : asdfqwerzxcv12!@23265@#%()Y$@#hdsgnjsad,./;’. Anggap saja saya tidak tahu password-nya. Password serumit apapun menjadi tidak berguna apabila pakai trik ini .
Segala tindakan apapun yang bersifat destruktif tidak dibenarkan. Segala perbuatan yang Anda lakukan merupakan tanggung jawab Anda sendiri.
(NB : Disini saya membobol komputer dengan RAM 240 MB dan Processor P4 2,26 GHz. Saya pakai komputer dengan spesifikasi rendah untuk lebih menekankan betapa cepatnya proses membobol password)
Sorry bos, fotonya motret jadi kualitasnya gak tinggi. Soalnya saya spontan buat ini artikel.
Menit 1 —
Menyalakan komputer korban. Masuk ke BIOS (Biasanya tekan DEL. Lihat pada saat pertama nyala. Biasanya ada tulisan Press [Blabla] to enter Startup. Nah tekan itu). Ini adalah screenshot BIOS saya.
Lihat menu Boot. Atur Boot Device Priority yang no.1 adalah CD Drive/Flash Disk. Setelah itu exit dengan meng-save state Bios tersebut.
Jika Anda tidak mengerti jangan khawatir. Biasanya sebuah komputer sudah ter-set secara default Boot Default Priority yang no.1 adalah CD Drive. Kecuali Anda akan menggunakan Flash Disk.
Oh, ya. Jangan lupa untuk memasukkan CD yang sudah diburn ke CD Drive korban atau Flash Disk ke USB Port komputer korban.
Setelah CD/Flash Disk tersebut sudah booting maka program chntpw yang berbasis Linux akan tampil di layar komputer korban. Tunggu sampai semuanya selesai ter-load.
Menit 2 - 3 —
Setelah semuanya sudah di-load. Maka Anda harus mengatur konfigurasi keberadaan OS yang diinstal (Step One). Tidak usah bingung. Langsung saja pencet Enter untuk memilih pilihan default. Biasanya pilihan default itu benar. Lihat gambar.
Setelah Step One ada Step Two yang meminta lokasi keberadaan pengaturan password dan registry. Secara default lokasinya adalah /Windows/System32/Config. Karena kita akan membobol Windows XP maka langsung saja enter karena lokasinya memang disini. Begitu juga Windows Vista.
Setelah itu ada pilihan kegiatan yang ingin dilakukan yaitu Password Reset, Recovery Console, dan Quit. Karena kita akan “membobol” password maka kita akan memilih pilihan satu yaitu Password Reset. Tekan 1 lalu enter atau enter saja langsung untuk memilih pilihan default.
Setelah itu hive akan terload untuk SAM System Security. Lalu akan ada opsi lagi.
Pilih lagi nomor 1 karena kita kan mengedit User Setting. Setelah itu akan muncul list dari user yang ada di OS Windows beserta statusnya. Kita bisa lihat mana user yang Admin dan mana yang bukan dan apakah user tersebut ter-lock atau tidak
Karena kita akan membobol password user Test maka ketikkan kata ”Test” tanpa tanda kutip lalu enter.
Ada beberapa pilihan. Ada pilihan untuk membuat password user tersebut menjadi blank atau merubah password sang user. Sayangnya opsi merubah password tidak bekerja dengan baik di OS Windows XP/Vista. Maka kita akan memilih opsi pertama yaitu mengubah password menjadi kosong (blank). Ketikkan angka 1 lalu enter.
(NB: Jika user tersebut di dis/lock maka jalankan dulu opsi ke 4 yaitu Unlock and Enable User Account sebelum menjalankan opsi 1)
Setelah opsi tersebut dijalankan ketikkan tanda “!” untuk kembali ke menu berikutnya. Lalu ketikkan lagi “q” untuk keluar dari chntpw.
Menit 3
Setelah opsi quit kita pilih akan muncul sebuah konfirmasi apakah perubahan yang kita lakukan akan dilakukan atau tidak. Ketik ”y” lalu enter.
Selanjutnya kita akan me-reboot komputer. Tapi tunggu dulu! Keluar dulu dari booting program ini. Jalankan New Run. Setelah itu keluarkan CD / copot Flash Disk. Tekan Ctrl + Alt + Del untuk restart.
Tunggu sampai kembali ke menu User.
Menit 4
Login lah ke user yang telah dibobol dan lihat! User sudah tidak berpassword.
PENJELASAN
Hm… 4 menit waktu yang cukup sebentar ya. Sebenarnya gini. Pengaturan konfigurasi password XP/Vista itu disimpan secara default di %SystemDrive%/Windows/System32/Config dengan nama file SAM. Kita tidak mempunyai hak akses secara manual ke file SAM tersebut selama berada di OS Windows. Kalau kita tidak punya hak akses selama di OS Windows maka alternatif-nya kita bisa meng-exploitnya dari OS lain!
Kita bisa menggunakan OS Linux yang diboot dari CD atau Flash Disk dengan beberapa program tambahan (seperti chntpw ini yang bisa kita pasang di Linux). Atau pakai distro linux yang khusus untuk keamanan seperti Backtrack yang sudah dilengkapi ratusan tool siap pakai termasuk pembobol dan pengcrack password. Tapi sepertinya kalau memakai OS lain akan memakan waktu lebih lama karena waktu untuk meload OS-nya saja akan memakan waktu (tergantung spec komputer-nya juga).
Nah, chntpw yang dibuat Peter Hagen ini adalah alternatif yang powerfull. Mini booting program ini berbasiskan Linux. Program ini mampu untuk mengexploit file konfigurasi Windows yang bisa diinstall ke CD atau Flash Disk. Chntpw bisa mengakses pengaturan user dan registry Windows. Jadi dengan mudahnya kita bisa membobol password Windows XP atau Vista walaupun serumit apapun. Ingat kata ”serumit apapun” cuma berlaku untuk membobol (menghilangkan password). Bukan untuk mengetahui password yang digunakan. Untuk mengcrack password agar kita mengetahui password suatu user butuh waktu yang cukup lama relatif dengan kerumitan password yang digunakan. Bahkan bisa dikatakan mustahil apabila passwordnya 12345!#$%&5woshtsdjlndhd./l[gkarpyslg./;
Gunakanlah trik exploit ini untuk kebaikan! Seperti mereset password karena yang punya lupa atau yang lainnya. Bagaimanapun juga segala tindakan destruktif itu tidak dibenarkan!
Oh, iya program ini juga bisa digunakan untuk membuat user yang berstatus Limited menjadi Administrator dan juga menampilkan Hidden Super Administrator di Windows Vista Service Pack 1! Bagaimana caranya? Tunggu artikel berikutnya.
Cara Membobol Windows Xp
Membobol Log-on windows xp
Sebenarnya, untuk membobol password log on pada Windows XP tidak diperlukan software khusus. Ada cara yang sangat sederhana untuk melakukannya. Kita hanya pelu melakukan langkah-langkah sebagai berikut:
- Hidupkan komputer.
- Jika sudah, tekan F8. Maka akan masuk ke mode select. pilih safe mode, lalu tunggu beberapa saat.
- Tekan Ctrl + Alt + Del Maka akan muncul form Log on dan Password.
- Isi log on dengan Administrator dan masukkan password semau anda.
- Jika telah melakukan hal di atas, restart kembali komputer anda.
- Pilihlah start in normaly windows.
- Tekan kembali Ctrl + Alt + Del .
- Ketikkan nama logonnya Administrator terus password yang baru anda ubah tadi.
Kalaucara diatas masih kurang manjur, masih ada cara cadangan:
- Hidupkan komputer, lalu masuk ke safe mode (tekan F8 saat booting),
- Masuk ke System dengan akun yang tidak terpassword, bisa Guest atau akun lain,
- Klik Start – Control Panel – Account Setting,
- Pilih account Administrator, maka anda akan melihat pilihan Remove Password …
- Silakan dilanjutkan
Demikian. Semoga berguna dan bermanfaat.
Membobol windows xp/vista
Akhirnya…. Artikel pertama mengenai hacking & cracking. Habis bingung sih mau nulis apa. Mana komputer pribadi saya rusak. Jadi sekarang saya pakai komputer kakak saya deh. Dan saya mau mencoba-coba disini.
Sekarang ini yang namanya membobol password OS keluarga Windows itu mudah. Bahkan Windows Vista yang diklaim Microsoft dibutuhkan bertahun-tahun dalam pengembangan keamanannya bisa ditembus dengan mudah.
Ingat disini saya pakai kata ”membobol”. Bukan meng-”crack” atau ”mengetahui”. Jadi maksudnya kita akan menerobos keamanan password. Tapi kita tidak akan mengetahui password-nya. Kalau ingin mengcrack password tidak cukup hanya waktu 5 menit (tergantung kerumitan password sih).
Trik ini bekerja di lingkungan Windows NT/2000/XP/Vista dan sepertinya bekerja di segala service pack yang sekarang beredar.
Apa yang kita butuhkan? Tentunya tidak bisa dengan tangan kosong kalau 5 menit (kecuali dengan social engineering kali ya). Download dulu sebuah file ISO bernama chntpw yang dibuat oleh seorang analis sekuriti Peter Hagen. Download disini. Download yang versi terakhir. Disini saya menggunakan versi 2008-08-02.
File ISO adalah sebuah image file yang isinya merupakan isi dari sebuah CD. Selanjutnya kita harus burn isi dari file ISO ke sebuah CD. Caranya ya dengan aplikasi yang sudah mendukungnya seperti Nero. Tetapi kalau tidak punya download aja tool Free ISO Burner di http://www.freedownloadscenter.com/Utilities/Misc__Utilities/Free_ISO_Burner.html
Selain bisa diburn ke CD program Chntpw juga bisa diinstall ke Flash Disk sehingga Flash Disk tersebut menjadi bootable. Caranya? Burn dulu file ISO ke CD. Lalu copy semua file dari CD tersebut ke Flash Disk (jangan copy ke folder). Setelah itu jalankan Command Prompt.
Lihat nama drive di Flash Disk kalian. Misalnya Flash Disk tersebut berada di drive E:. Maka ketikkan “e:” lalu enter.
Setelah itu ketikkan “syslinux.exe -ma %driveFD%”. Ganti tulisan %driveFD% dengan nama drive Flash Disk kalian. Karena disini di komputer saya FD terdeteksi sebagai drive E maka saya akan mengetikkan “syslinux.exe -ma e:”. Setelah itu Flash Disk sudah bisa dipakai untuk booting chntpw.
Setelah itu bawalah CD/Flash Disk dibawa komputer korban. Disini saya akan memakai sebuah komputer dengan Windows XP SP 2 (komputer kakak saya). Tadinya saya mau coba Windows Vista tapi komputer yang ada Windows Vista-nya lagi rusak. Saya akan menjebol sebuah akun bernama Test dan passwordnya : asdfqwerzxcv12!@23265@#%()Y$@#hdsgnjsad,./;’. Anggap saja saya tidak tahu password-nya. Password serumit apapun menjadi tidak berguna apabila pakai trik ini .
Segala tindakan apapun yang bersifat destruktif tidak dibenarkan. Segala perbuatan yang Anda lakukan merupakan tanggung jawab Anda sendiri.
(NB : Disini saya membobol komputer dengan RAM 240 MB dan Processor P4 2,26 GHz. Saya pakai komputer dengan spesifikasi rendah untuk lebih menekankan betapa cepatnya proses membobol password)
Sorry bos, fotonya motret jadi kualitasnya gak tinggi. Soalnya saya spontan buat ini artikel.
Menit 1 —
Menyalakan komputer korban. Masuk ke BIOS (Biasanya tekan DEL. Lihat pada saat pertama nyala. Biasanya ada tulisan Press [Blabla] to enter Startup. Nah tekan itu). Ini adalah screenshot BIOS saya.
Lihat menu Boot. Atur Boot Device Priority yang no.1 adalah CD Drive/Flash Disk. Setelah itu exit dengan meng-save state Bios tersebut.
Jika Anda tidak mengerti jangan khawatir. Biasanya sebuah komputer sudah ter-set secara default Boot Default Priority yang no.1 adalah CD Drive. Kecuali Anda akan menggunakan Flash Disk.
Oh, ya. Jangan lupa untuk memasukkan CD yang sudah diburn ke CD Drive korban atau Flash Disk ke USB Port komputer korban.
Setelah CD/Flash Disk tersebut sudah booting maka program chntpw yang berbasis Linux akan tampil di layar komputer korban. Tunggu sampai semuanya selesai ter-load.
Menit 2 - 3 —
Setelah semuanya sudah di-load. Maka Anda harus mengatur konfigurasi keberadaan OS yang diinstal (Step One). Tidak usah bingung. Langsung saja pencet Enter untuk memilih pilihan default. Biasanya pilihan default itu benar. Lihat gambar.
Setelah Step One ada Step Two yang meminta lokasi keberadaan pengaturan password dan registry. Secara default lokasinya adalah /Windows/System32/Config. Karena kita akan membobol Windows XP maka langsung saja enter karena lokasinya memang disini. Begitu juga Windows Vista.
Setelah itu ada pilihan kegiatan yang ingin dilakukan yaitu Password Reset, Recovery Console, dan Quit. Karena kita akan “membobol” password maka kita akan memilih pilihan satu yaitu Password Reset. Tekan 1 lalu enter atau enter saja langsung untuk memilih pilihan default.
Setelah itu hive akan terload untuk SAM System Security. Lalu akan ada opsi lagi.
Pilih lagi nomor 1 karena kita kan mengedit User Setting. Setelah itu akan muncul list dari user yang ada di OS Windows beserta statusnya. Kita bisa lihat mana user yang Admin dan mana yang bukan dan apakah user tersebut ter-lock atau tidak
Karena kita akan membobol password user Test maka ketikkan kata ”Test” tanpa tanda kutip lalu enter.
Ada beberapa pilihan. Ada pilihan untuk membuat password user tersebut menjadi blank atau merubah password sang user. Sayangnya opsi merubah password tidak bekerja dengan baik di OS Windows XP/Vista. Maka kita akan memilih opsi pertama yaitu mengubah password menjadi kosong (blank). Ketikkan angka 1 lalu enter.
(NB: Jika user tersebut di dis/lock maka jalankan dulu opsi ke 4 yaitu Unlock and Enable User Account sebelum menjalankan opsi 1)
Setelah opsi tersebut dijalankan ketikkan tanda “!” untuk kembali ke menu berikutnya. Lalu ketikkan lagi “q” untuk keluar dari chntpw.
Menit 3
Setelah opsi quit kita pilih akan muncul sebuah konfirmasi apakah perubahan yang kita lakukan akan dilakukan atau tidak. Ketik ”y” lalu enter.
Selanjutnya kita akan me-reboot komputer. Tapi tunggu dulu! Keluar dulu dari booting program ini. Jalankan New Run. Setelah itu keluarkan CD / copot Flash Disk. Tekan Ctrl + Alt + Del untuk restart.
Tunggu sampai kembali ke menu User.
Menit 4
Login lah ke user yang telah dibobol dan lihat! User sudah tidak berpassword.
PENJELASAN
Hm… 4 menit waktu yang cukup sebentar ya. Sebenarnya gini. Pengaturan konfigurasi password XP/Vista itu disimpan secara default di %SystemDrive%/Windows/System32/Config dengan nama file SAM. Kita tidak mempunyai hak akses secara manual ke file SAM tersebut selama berada di OS Windows. Kalau kita tidak punya hak akses selama di OS Windows maka alternatif-nya kita bisa meng-exploitnya dari OS lain!
Kita bisa menggunakan OS Linux yang diboot dari CD atau Flash Disk dengan beberapa program tambahan (seperti chntpw ini yang bisa kita pasang di Linux). Atau pakai distro linux yang khusus untuk keamanan seperti Backtrack yang sudah dilengkapi ratusan tool siap pakai termasuk pembobol dan pengcrack password. Tapi sepertinya kalau memakai OS lain akan memakan waktu lebih lama karena waktu untuk meload OS-nya saja akan memakan waktu (tergantung spec komputer-nya juga).
Nah, chntpw yang dibuat Peter Hagen ini adalah alternatif yang powerfull. Mini booting program ini berbasiskan Linux. Program ini mampu untuk mengexploit file konfigurasi Windows yang bisa diinstall ke CD atau Flash Disk. Chntpw bisa mengakses pengaturan user dan registry Windows. Jadi dengan mudahnya kita bisa membobol password Windows XP atau Vista walaupun serumit apapun. Ingat kata ”serumit apapun” cuma berlaku untuk membobol (menghilangkan password). Bukan untuk mengetahui password yang digunakan. Untuk mengcrack password agar kita mengetahui password suatu user butuh waktu yang cukup lama relatif dengan kerumitan password yang digunakan. Bahkan bisa dikatakan mustahil apabila passwordnya 12345!#$%&5woshtsdjlndhd./l[gkarpyslg./;
Gunakanlah trik exploit ini untuk kebaikan! Seperti mereset password karena yang punya lupa atau yang lainnya. Bagaimanapun juga segala tindakan destruktif itu tidak dibenarkan!
Oh, iya program ini juga bisa digunakan untuk membuat user yang berstatus Limited menjadi Administrator dan juga menampilkan Hidden Super Administrator di Windows Vista Service Pack 1! Bagaimana caranya? Tunggu artikel berikutnya.
Minggu, 11 Oktober 2009
VISUAL BASIC 6.0 : Pengenalan Form
VISUAL BASIC 6.0 : Pengenalan Form
Beberapa waktu yang lalu waktu gw masih kuliah, gw nyoba-nyoba bikin tutorial tentang VB 6.0, lumayan sambil belajar, sambil mengajar. Tapi tampaknya niat cuma tinggal niat, karena sampe sekarangpun tutorial itu belum selesai karena memang tidak pernah di urus lagi.
Berikut ini adalah satu-satunya bagian yang jadi, yaitu pengenalan FORM. Sebenarnya artikel ini sendiripun gak 100 % gw yang buat, tapi beberapa-nya ada yang gw kutip dari E-Book, yaitu E-Book Programming With Visual Basic 6.0.
Ok gitu aja dari gw, silakhan enjoy Tutorial na:
Pengenalan Properties, Method dan Event
Form adalah Object Visual Basic pertama yang harus kita kenali. Hal ini di sebabkan karena hampir semua aplikasi Visual Basic menggunakan satu Form atau lebih. Control adalah object VB yang dapat di letakan dalam Form.
Form dan object-object dalam VB dapat kita analogikan dengan manusia, di mana setiap manusia memiliki cirri khas tertentu, misalnya seperti tinggi badan, gemuk kurus dan sebagainya maka object dalam VB juga memiliki karakteristik yang di kenal dengan nama Properties. Jika manusia bisa melakukan tindakan-tindakan seperti menghapus, berjalan dan sebagainya maka object juga memiliki tindakan yang di sebut dengan methods seperti Move, PaintPicture, CLS, Print. Manusia dapat bereaksi terhadap suatu event tertentu maka object juga dapat, hal ini di kenal dengan nama Event, misalnya saat Mouse diklik, key board di tekan dan lain sebagainya.
A. Properties Standard
Setiap Object dalam VB memiliki banyak sekali properties, tetapi biasanya properties itu juga di miliki oleh object lain sehingga jika kita sudah menguasai salah satu object, untuk mempelajari object lain akan menjadi lebih mudah. Berikut ini akan di bahas properties-properties standard yang ada hamper di setiap object dalam VB.
Properties Left, Top, Width dan Height
Hampir semua object yang dapat di lihat memiliki properties ini di karenakan properties ini di gunakan untuk menunjukan letak dan ukuran dari object tersebut.
Top dan left di gunakan untuk menentukan posisi dari object, dimana Top adalah posisi sumbu Y control dalam container, dimana semakin besar nilai Top maka posisi object makin ke bawah. Properties Left di gunakan untuk menentukan posisi object pada sumbu X dalam container di mana makin besar nilai Left maka posisi Object akan makin ke kanan. Container adalah sebuah object yang dapat menampung object lainnya seperti object Form atau object Frame.
Properties Width dan Height di gunakan untuk menentukan ukuran dari object di mana width merupakan lebar dan height merupakan tinggi dari object. Ukuran yang di gunakan adalah twips dimana1440 twips = 1 inchi atau 567 twips = 1 cm. Pada beberapa object properties Left, Top, Width dan Height hanya bisa di baca dan tidak bisa diganti seperti pada object combo box, dimana Height-nya di pengaruhi oleh font yang di gunakan oleh object tersebut.
Contoh Programnya :
Private Sub Command1_Click()
‘Memindahkan Posisi Picture1 ke kiri
Picture1.Left = Picture1.Left – 20
End Sub
Private Sub Command2_Click()
‘Memindahkan Posisi Picture1 ke bawah
Picture1.Top = Picture1.Top + 20
End Sub
Private Sub Command3_Click()
‘Memindahkan Posisi Picture1 ke atas
Picture1.Top = Picture1.Top - 20
End Sub
Private Sub Command4_Click()
‘Memindahkan Posisi Picture1 ke kanan
Picture1.Left = Picture1.Left + 20
End Sub
Private Sub Command5_Click()
‘Mengurangi lebar dan tinggi Picture1
Picture1.Width = Picture1.Width - 10
Picture1.Height = Picture1.Height - 10
End Sub
Private Sub Command6_Click()
‘Menambahkan lebar dan tinggi Picture1
Picture1.Width = Picture1.Width + 10
Picture1.Height = Picture1.Height + 10
End Sub
Dalam Program ini saat user menekan Command arah maka Picture1 akan bergerakn mengikuti arah command tersebut. Jika user menekan Kecil maka program akan mengurangi width dan height dari picture1 dan sebaliknya jika user menekan command besar.
Properties ForeColor dan BackColor
Propeperties ForeColor dan BackColor mempengaruhi warna dari tulisan dan background dari sebuah object. Pada beberapa object, properties ini di pengaruhi oleh properties lain misalnya pada object label properties BackColor tidak akan berguna jika properties BackStyle-nya bernilai 0-Transparent.
Saat memilih dalam properties window maka kita dapat memilih warna dari antara Pallete ataupun System. Warna dari System di pengaruhi oleh system, misalnya jika kita menggunakan styleXp atau kita merubah-rubah warna standard sytem maka warna tersebutlah yang akan tampil.
Gambar Pilihan Warna System dan Warna Palette
Kita juga dapat memberikan warna dengan menggunakan metode RGB, QBCOLOR ataupun dengan HeksaDesimal.
Daftar Warna
Konstanta | Nilai Heksa | Deskripsi |
vb3DDKShadow | &H80000015 | Darkest shadow |
vb3Dface | &H8000000F | Dark shadow color for 3-D display elements |
vb3Dhighlight | &H80000014 | Highlight color for 3-D display elements |
vb3Dlight | &H80000016 | Second lightest of the 3-D colors after vb3Dhighlight |
vb3Dshadow | &H80000010 | Color of automatic window shadows |
vbActiveBorder | &H8000000A | Active window border color |
vbActiveTitleBar | &H80000002 | Active window caption color |
vbActiveTitleBarText | &H80000009 | Text color in active caption, size box, scroll bar arrow box |
vbApplicationWorkspace | &H8000000C | Background color of multiple-document interface (MDI) applications |
vbButtonFace | &H8000000F | Face shading on command buttons |
vbButtonShadow | &H80000010 | Edge shading on command buttons |
vbButtonText | &H80000012 | Text color on push buttons |
vbDesktop | &H80000001 | Desktop color |
vbGrayText | &H80000011 | Grayed (disabled) text |
vbHighlight | &H8000000D | Background color of items selected in a control |
vbHighlightText | &H8000000E | Text color of items selected in a control |
vbInactiveBorder | &H8000000B | Inactive window border color |
vbInactiveCaptionText | &H80000013 | Color of text in an inactive caption |
vbInactiveTitleBar | &H80000003 | Inactive window caption color |
vbInactiveTitleBarText | &H80000013 | Text color in inactive window caption, size box, scroll bar arrow box |
vbInfoBackground | &H80000018 | Background color of ToolTips |
vbInfoText | &H80000017 | Color of text in ToolTips |
vbMenuBar | &H80000004 | Menu background color |
vbMenuText | &H80000007 | Text color in menus |
vbScrollBars | &H80000000 | Scroll bar gray area color |
vbTitleBarText | &H80000009 | Text color in active caption, size box, scroll bar arrow box |
vbWindowBackground | &H80000005 | Window background color |
vbWindowFrame | &H80000006 | Window frame color |
vbWindowText | &H80000008 | Text color in windows |
Properties Font
Properties Font biasanya dimiliki oleh object-object yang dapat menampilkan string. Properties Font terdiri dari properties Name, Size, Bold, Italic, Underline dan Strikethrough.
Contoh Sintaksnya
‘Mengganti Nama Font
Me.Font.Name = ”Arial”
‘Mengganti Ukuran Font
Me.Font.Size = 14
‘Menggarisbawahi Font
Me.Font.Underline = true
‘Membuat Font suatu object sama dengan object lain
‘dan font tersebut akan ikut berganti jika font yang
‘di ikutinya juga berganti
Set object1.font = object2.font
Saat mendesain kita bisa mengklik Font dalam property window untuk menampilkan Font Dialog.
Gambar Font Window
Dalam perancangan di Run Time, penggantian Font dengan nilai yang salah tidak akan menampilkan error, tetapi VB akan mengubah nilainya dengan yang paling mungkin untuk ukuran dan tidak menentu untuk nama Font.
Properties Caption dan Text
Caption adalah properties yang biasanya terdapat dalam suatu object yang memiliki nilai string yang tidak dapat di edit ataupun di blok oleh user. Text adalah properties yang biasanya terdapat pada suatu object yang dapat di tulisi string oleh user atau user dapat memblok nilai string tersebut.
Biasanya dalam caption kita dapat menggunakan tanda & (ampersand) untuk mebuat object tersebut mendapat focus jika kita menekan tombol Alt + tombol setelah tanda &.
Umumnya jika sebuah object mendukung properties Text maka ia juga mendukung selText, SelStart dan SelLength yang memengaruhi Text yang di blok.
Contoh Program :
‘Event ini berjalan saat user mengubah nilai Scroll Di Frame BackColor
Private Sub Back_Color_Change(Index As Integer)
Me.Label1.BackColor = RGB(Me.Back_Color(0).Value, Me.Back_Color(1).Value, Me.Back_Color(2).Value)
End Sub
‘Event ini berjalan saat user mengubah nilai Scroll Di Frame BackColor
Private Sub Back_Color_Scroll(Index As Integer)
Me.Label1.BackColor = RGB(Me.Back_Color(0).Value, Me.Back_Color(1).Value, Me.Back_Color(2).Value)
End Sub
Private Sub cboNama_Click()
Me.Label1.Font.Name = cboNama.Text
End Sub
Private Sub cboUkuran_Click()
Me.Label1.Font.Size = cboUkuran.Text
End Sub
Private Sub chkBold_Click()
Me.Label1.Font.Bold = Not Me.Label1.Font.Bold
End Sub
Private Sub chkItalic_Click()
Me.Label1.Font.Italic = Not Me.Label1.Font.Italic
End Sub
Private Sub chkStrikeThrought_Click()
Me.Label1.Font.Strikethrough = Not Me.Label1.Font.Strikethrough
End Sub
Private Sub chkUnderLine_Click()
Me.Label1.Font.Underline = Not Me.Label1.Font.Underline
End Sub
Private Sub cmdTampil_Click()
‘Melakukan Pengecekan apakah teks sudah di blok
‘Jika sudah maka panjangnya yeks yang di blok pasti>0
If Text1.SelLength = 0 Then
MsgBox “Tidak ada Teks Yang DiBlok”, vbCritical
Else
Label1.Caption = Text1.SelText
End If
End Sub
Private Sub Fore_Color_Change(Index As Integer)
Me.Label1.ForeColor = RGB(Me.Fore_Color(0).Value, _
Me.Fore_Color(1).Value, Me.Fore_Color(2).Value)
End Sub
Private Sub Fore_Color_Scroll(Index As Integer)
Me.Label1.ForeColor = RGB(Me.Fore_Color(0).Value, _
Me.Fore_Color(1).Value, Me.Fore_Color(2).Value)
End Sub
Private Sub Form_Load()
‘menghilangkan tampilan control file
File1.Visible = False
‘membuat control file1 mencari file dengan ext .ttf
File1.Pattern = “*.ttf”
‘membuat control file1 mencari di dir D:\Windows\Font
File1.Path = “D:\WINDOWS\FONTS”
Dim i As Integer
‘Memasukan nilai-nilai yang ada di file1 ke dalam
‘control cboNama dan menghilangkan
‘extensionnya dengan cara mengurangi panjang data
‘sebanyak 4 karakter dari blkang
For i = 0 To File1.ListCount - 1
Me.cboNama.AddItem Mid(File1.List(i), 1, _
Len(File1.List(i)) - 4)
Next i
‘membuat CboNama menunjuk index pertama
Me.cboNama.ListIndex = 0
For i = 4 To 18
Me.cboUkuran.AddItem i
Next i
‘Memberikan nilai Fore_Color untuk masing2x object
‘array
For i = 0 To 2
Me.Fore_Color(i) = 255
Next i
Me.cboUkuran.ListIndex = 5
‘Membuat Font text1 selalu mengikuti Font label1
Set Text1.Font = Label1.Font
‘ Memanggil Prosedur-prosedur
cboNama_Click
cboUkuran_Click
Back_Color_Scroll 1
Fore_Color_Change 1
Refresh
End Sub
Private Sub Text1_Change()
‘ Membuat nilai label1 sama dengan text1
Label1.Caption = Text1.Text
End Sub
Gambar Contoh 2
Properties Parents dan Container
Properties Parents adalah properties yang hanya terdapat pada keadaan Run Time, yaitu pada saat program di jalankan. Dengan Parent dapat di beritahukan pada form bahwa control tersebut berada dalam form itu.
Properties Container juga merupakan properties Run Time Only. Ia memberitahukan pada Container bahwa control tersebut berada Container itu. Kita dapat memindahkan sebuah object dari satu container ke container lainnya dengan cara :
Set Nama_Control.Container = Nama_Container
Contoh :
‘Memindahkan Command1 ke dalam picture1 dan
‘meletakannya di pojok kiri atas container
Set Command1.Container = Picture1
Command1.Top = 1
Command1.Left = 1
Properties Enabled dan Visible
Semua control dalam VB secara default memiliki properties True untuk Enabled dan Visible. Tetapi, karena beberapa alasan kadang-kadang kita ingin hanya menampilkan suatu object tanpa bisa di gunakan oleh user, atau kita juga ingin menggunakan suatu object tanpa memperlihatkannya kepada user.
Properties Enabled = false dapat digunakan untuk membuat control tersebut bebas dari pengaruh user, tetapi control tersebut tetap dapat di pengaruhi oleh program melalui proses pengkodean. Properti Visible = false dapat di gunakan untuk menyembunyikan sebuah control sehingga tidak terlihat oleh user.
Properties hWnd
Properties hWnd termasuk properties yang bersifat Run Time Only. Selain itu ia juga merupakan Read Only Properties yang hanya bisa di baca dan tidak bisa di tulis. hWnd memberikan nilai integer 32 bit yang di berikan windows untuk mengindentifikasi suatu control. Nilai dari hWnd ini akan hanya di gunakan pada penggunaan VB API .
Kontrol dari VB dapat dibedakan menjadi dua, yaitu standard dan windowless. Contohnya adalah PictureBox (standard) dan Image (windowless). Walaupun keliahatannya ke dua control itu sama, tetapi mereka sungguh berbeda.
Saat kita meletakan suatu control standard ke dalam form, VB meminta OS untuk membuat sebuah instance, sehingga OS memberikan nilai kepada control tersebut yang berupa nilai hWnd. Saat control itu menerima event, control tersebut akan melakukan fungsi API dan lalu memberitahukan OS control mana yang dipengaruhi.
Kontrol windowless di lain pihak tidak melakukan tersebut, dan hanya membutuhkan VB untuk mengaturnya. Sehingga control windowless adalah control yang tidak mengandung property hWnd karena ia tidak berinteraksi dengan OS, walaupun terkadang ada control standard yang tidak memberikan properties hWnd dengan beberapa alasan.
Kontrol standard memakan memory dan resource lebih banyak daripada control windowless dengan contoh perbandingan form yang mengandung 100 Picture Box akan 10 kali lebih lambat daripada form yang mengandung 100 image control.
Properties TabStop dan TabIndex
Jika sebuah control dapat menerima focus maka control tersebut pasti memili dua properties ini. Kontrol windowless tidak akan memiliki ke dua properties ini karena mereka tidak akan pernah mendapatkan focus.
TabStop memberikan keterangan apakah dengan menekan tab, focus dapat diberikan kekontrol tersebut. TabIndex memberikan keterangan tentang urutan keberapakah suatu konrol akan mendapat giliran mendapat fokus.
Properties MousePointer dan MouseIcon
Properties ini mempengaruhi bentuk dari Cursor Mouse saat berada di atas sebuah control. VB memberikan cara yang sangat flexible dalam memanajemen bentuk mouse karena setiap form dan control dapat memberikan bentuk mouse yang berbeda.
Properties MousePointer digunakan untuk menentukan jenis mouse yang akan digunakan sedangkan properties MouseIcon digunakan untuk me-load Mouse Icon yang tidak terdapat dalam VB. Tetapi nilai dalam MousePointer-nya harus diganti dengan 99-vbCustom terlebih dahulu.
Berikut ini adalah contoh penggunaannya :
‘Contoh Mouse Pointer
‘Misalnya Program akan mengubah bentuk mouse menjadi CrossHair saat ada di ’picture Box
Picture1.MousePointer = vbCrosshair
MousePointer = vbDefault
‘Contoh Penggunaan MouseIcon
‘Kita ubah dulu MousePointer menjadi 99-vbCustom
MousePointer = vbCustom
‘Masukan alamat File .ico-nya
MouseIcon = LoadPicture(”D:\Program Files\Microsoft Visual _
Studio\VB98\graphics\icons\computer\msgbox01.ico”)
Properties Tag
Semua konrol memiliki Properties tag ini, karena properties ini berasal dari VB sehingga bahkan control ActiveX pun memilikinya. Properties yang berasal dari VB selain Tag adalah Index, Visible, TabStop, TabIndex, ToolTipText, HelpContextID, dan WhatsThisHelpID.
Fungsi Properties Tag hanyalah untuk menyimpan data yang biasanya berhubungan dengan control yang memiliki Tag tersebut. Jadi Properties ini fungsi seperti variabel.
Properties Lainnya
Properties Value biasanya di gunakan untuk menyimpan nilai dari suatu control. Misalnya checkbox, CommandButton, OptionButton dan scrollbar.
Properties Index digunakan untuk memberikan petunjuk no array bagi sebuah control. Jika sebuah control bukan array maka nilai index-nya adalah kosong.
Properties BorderStyle menentukan apakah sebuah control menggunakan Border atau tidak.
Properties ToolTips digunakan untuk mengisi kotak kuning kecil yang berisi petunjuk yang akan ditampilkan jika kita menunjuk sebuah control dengan pointer mouse selama waktu tertentu.
B. Method Standar
Hampir semua object dalam VB memiliki method. Method adalah sebuah fungsi atau prosedur yang akan dilakukan oleh sebiah object. Berbeda dengan properties, jumlah method tidaklah begitu banyak. Berikut ini adalah method-method setandar.
Move Method
Jika sebuah control mendukung properties Left, Top, Width, dan Heigh maka control tersebut juga akan memilki method Move. Move di gunakan untuk menggerakan atau mengganti ukuran sebuah control.
Sintaksnya : Control.Move Left, [Top], [Width], [Height]
Contoh Pengunaannya
‘Memindahkan Pic ke kiri atas
pic.Move 0, 0
‘Mengubah ukuran pic jadi 2 kali lipat
pic.Move Me.Left, , pic.Width * 2, pic.Height * 2
Penggunaan Method Move memiliki kecepatan dua kali lipat dari pada jika mengganti properties secara manual dan dia juga hanya memanggil event Resize satu kali saja walaupun keempat properties kita ganti semuanya.
Method Refresh
Method Refresh digunakan untuk membuat program berhenti untuk menyelesaikan tugas sebelumnya sebelum melanjutkan ke perintah berikutnya. Hal ini biasanya dilakukan pada PictureBox, ataupun label.
Sintaksnya : Control.Refresh
Contoh Pengunaannya
Dim I as integer
Dim Pros as Byte
for I = 1 to 10
‘Melakukan Peloadingan Gambar
pic.picture loadPicture(“D:\JoTampan” & I & “.jpg”)
‘Mebuat Gambar langsung ditampilkan
pic.refresh
‘Label menunjukan jumlah proses
pros= I * 10
LblPros.Caption = “Meload Gambar JoTampan” & _
I & “.jpg (” & Pros & “%)”
‘Membuat Nilai Proses Ditampilkan
LblPros.Refresh
Next I
Method SetFocus
Method ini digunakan untuk memberikan sebuah control focus, sehingga Control tersebut memanggil Event GotFocus. Method ini biasanya digunakan pada textbox.
Sintaksnya : Control.SetFocus
Contoh Pengunaannya
‘Saat User Menekan Tombol Submit
Private Sub cmdSubmit_Click()
‘Program Memeriksa apakah nama diisi
If txtNama.Text = “” Then
MsgBox “Nama Harus Disiisi”, vbCritical
txtNama.SetFocus
else
Msgbox “Pengisian sudah benar”, vbInformation
End If
End Sub
Method Zorder
Zorder digunakan untuk memindahkan letak sebuah control. Method ini menentukan apakah sebuah control berada di depan atau di belakang control lainnya.
Sintaksnya : Control.Zorder [1]
Jika tanpa menggunakan 1 maka control akan di detempatkan di depan control yang lain, sedangkan jika dengan 1 maka control akan dipindahkan ke belakang control yang lain.
Contoh Pengunaannya
‘Meletakan Label1 DiDepan
Private Sub Command1_Click()
Label1.ZOrder
End Sub
‘Meletakan Label1 diBelakang
Private Sub Command2_Click()
Label1.ZOrder 1
End Sub
C. Event Standar
Event dalam VB adalah suatu kejadian yang dapat mengakibatkan di jalankannya perintah-perintah program. Event di gunakan sebagai tempat menuliskan kode-kode pemrograman.
Event Click dan DoubleClick
Event click terjadi pada saat user mengklik suatu control, dan doubleClick terjadi saat user melakukan doubleClick. Event Click juga terjadi jika kita merubah nilai Value dari optionBox atau checkbox melalui kode pemrograman.
Event Change
Event Change terjadi pada saat user merubah nilsi Properties tertentu (umumnya properties Text) dari suatu Control Baik dengan di ketik maupun dengan kode. Event ini dimiliki oleh TextBox, ComboBox, DriveListBox, DirListBox dan PictureBox.
Event GotFocus dan LostFocus
Event GotFocus terjadi pada saat sebuah control mendapatkan focus dari user (diklik misalnya). Sedangkan LostFocus terjadi pada saat user memberikan focus kepada control lainnya.
Event KeyDown, KeyPress dan KeyUp
Event-event ini terjadi saat user menekan tombol keyboard dan lalu melepaskannya. Urutan Event ini adalah KeyDown yaitu saat user menekan tombol keyboard, setelah itu KeyPress yaitu pada saat Program menerjemahkan nilai tombol keyboard yang di tekan dengan kode ANSI, lalu terakhir adalah keyUp yaitu saat user melepaskan tombol KeyBoard.
Event KeyDown dan KeyUp memiliki dua buah Parameter yaitu keyCode dan Shift. KeyCode digunakan untuk memberikan nilai tombol yang ditekan, sedangkan shift menunjukan keadaan tombol Ctrl, Shift dan alt.
Contoh Penggunaan :
Private Sub Text1_KeyDown(KeyCode As Integer, _
Shift As Integer)
‘Pengecekan nilai Shift dilakukan dgn menggunakan And
If Shift And vbShiftMask Then
' Shift key pressed
End If
If Shift And vbCtrlMask Then
' Ctrl key pressed
End If
If Shift And vbAltMask Then
' Alt key pressed
End If
End Sub
Private sub Text1_KeyPress(KeyAscii As Integer)
MsgBox "User pressed " & Chr$(KeyAscii)
End Sub
Event MouseDown, MouseMove dan MouseUp
Event MouseDown terjadi saat user menekan Salah satu tombol Mouse. MouseMove terjadi saat user menggerakan Mouse di atas control dan MouseUp terjadi saat user melepaskan tombol Mouse yang di tekan.
ContohProgramnya :
Private Sub Form_Load()
‘Membuat Form mampu melakukan Penggambaran Ulang
Me.AutoRedraw = True
End Sub
Private Sub Form_MouseDown(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
Tampilkan Button, Shift, X, Y
End Sub
Private Sub Form_MouseMove(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
Tampilkan Button, Shift, X, Y
End Sub
Sub Tampilkan(TombolMouse As Integer, _
Shift As Integer, X As Single, Y As Single)
Me.Cls
Me.Print “Posisi Tombol Mouse ada di (” _
& X & “,”; Y & “)”
If Not TombolMouse = 0 Then
Dim YangDiTekan As String
If TombolMouse = 1 Then
YangDiTekan = “Kiri”
Else
YangDiTekan = “Kanan”
End If
Me.Print “Tombol yang di tekan adalah” & _
” Tombol ” & YangDiTekan
End If
If Not Shift = 0 Then
If Shift = 1 Then
Me.Print “User Menekan Shift “
ElseIf Shift = 2 Then
Me.Print “User Menekan CTRL “
ElseIf Shift = 4 Then
Me.Print “User Menekan aLT “
End If
End If
Me.Refresh
End Sub