Validasi Input Data Menggunakan Regular Expressions di VB

Udah 2 bulan di kota hujan Bogor…ga kerasa…jd kangen jogja nih…pengen ketemu temen-temen disana…apalagi lagi ada yang ulang lahun nih..wah nyesel banget klo ga dapet jatah traktiran…harus bisa pulang pokoknya…hehehehehe

Ok deh…Seperti yang sudah saya janjikan sebelumnya, sekarang kita akan mencoba bagaimana menggunakan regular expressions untuk validasi input data di visual basic 6.0. Kita akan menggunakan regex untuk mengecek apakah input yang kita masukkan benar atau tidak, jika benar maka regex akan menampilkan pesan benar, begitu juga sebaliknya jika salah maka akan ditampilkan pesan salah.

Kode yang kita perlukan untuk membuat validasi input menggunakan regex di VB kira-kira seperti ini:

Dim EkspresiReguler As New RegExp, Benar As Match
Dim DataInput As String

Private Sub Text1_Change()

‘dikasih di text1_change agar regex melakukan pengecekan secara langsung ketika text diisi

DataInput = Text1.Text
EkspresiReguler.Pattern = “disinilah tempat meletakkan regex patternya”

EkspresiReguler.Global = True

‘ini kode untuk mengecek kesesuaian input degen pattern yang diberikan

Label5.Caption = “Input Nama Salah”
For Each Benar In EkspresiReguler.Execute(DataInput)
Label5.Caption = “Input Nama Benar”
Next
End Sub

Agar bisa menjalankan regular expressions di vb, kita akan menggunaan library VBScript scripting library punyanya microsoft. Penah baca nih tapi belum membuktikan, hehehe…. katanya library ini adalah bagian dari Internet Explorer 5.5 ke atas, jadi dengan begitu library ini pasti ada di komputer yang menggunakan IE 5.5 ke atas seperti Windows XP atau Vista , dan termasuk juga Windows versi sebelumnya yang sudah diupgrade dengan IE 5.5 ke atas.

Untuk menggunakan Regex di VB kita perlu mengaktifkan library ini terlebih dahulu di visual basic kita. caranya :

masuk ke Visual Basic 6.0

pilih menu Project -> References

Maka akan muncul tampilan dialog References seperti ini :

regex3Nah…kalo sudah muncul tampilan seperti di atas, pilih dan contreng “Microsoft VBScript Regular Expressions 5.5″, jangan sampai salah contreng ya…hehehe jd kaya pemilu ja pake contreng-contrengan, klo dah dicontreng klik tombol OK. Trus….

Langkah selanjutnya buatlah tampilan seperti gambar di bawah ini :

regex1

kalo sudah, selanjutnya ubah nilai properties masing masing object yang sudah dipasang di form tadi.

Label1.Caption = “Nama”

Label2.Caption=”No. Telp”

Label3.Caption=”E-Mail”

Label4.Caption=”Website”

Label5.Caption=”Data yang anda masukkan benar/salah”

Trus Kosongkan property Text pada Text1,Text2,Text3,dan Text4

sehingga tampilannya menjadi sbb:

regex2

Sampai disini, kita sudah membuat tampilannya. Langkah selanjutnya menuliskan kode program Regex yang akan digunakan untuk validasi input di kode editor visual basic.

Kodenya sebagai berikut :


‘ inisialisasi regular expressions

Dim EkspresiReguler As New RegExp, Benar As Match
Dim DataInput As String

‘regex untuk input nama ( mengecek ketika text1 diisi )
Private Sub Text1_Change()
DataInput = Text1.Text
EkspresiReguler.Pattern = “^D+$”
EkspresiReguler.Global = True

Label5.Caption = “Input Nama Salah”
For Each Benar In EkspresiReguler.Execute(DataInput)
Label5.Caption = “Input Nama Benar”
Next
End Sub
‘regex untuk input telepon ( mengecek ketika text2 diisi )
Private Sub Text2_Change()
DataInput = Text2.Text
EkspresiReguler.Pattern = “^d+$”
EkspresiReguler.Global = True

Label5.Caption = “Input Telepon Salah”
For Each Benar In EkspresiReguler.Execute(DataInput)
Label5.Caption = “Input Telepon Benar”
Next

End Sub
‘regex untuk input email( mengecek ketika text3 diisi )

Private Sub Text3_Change()
DataInput = Text3.Text
EkspresiReguler.Pattern = “^([A-Za-z0-9]+([_]|[.])?)+[A-Za-z0-9]+@(([A-Za-z0-9]+[-]?)+[A-Za-z0-9]+.)+[A-Za-z]{2,3}$”
EkspresiReguler.Global = True

Label5.Caption = “Input Email Salah”
For Each Benar In EkspresiReguler.Execute(DataInput)
Label5.Caption = “Input Email Benar”
Next

End Sub

‘regex untuk input website( mengecek ketika text4 diisi )

Private Sub Text4_Change()
DataInput = Text4.Text
EkspresiReguler.Pattern = “^(([A-Za-z0-9]+[-]?)+[A-Za-z0-9]+.)+[A-Za-z]{2,3}$”
EkspresiReguler.Global = True

Label5.Caption = “Input Website Salah”
For Each Benar In EkspresiReguler.Execute(DataInput)
Label5.Caption = “Input Website Benar”
Next

End Sub

Nah itu kodenya… ga usah diketik lagi, capek + lama. dicopy paste aja,yang penting tahu maksudnya dan kalo ditanya bisa jawab..hehehe, o iya untuk Pattern Regexnya di vb dijadiin satu baris aja, soalnya di sini ga bisa dijadikan satu baris, kepanjangan.

Kalo semuanya sudah..tinggal dijalankan, lalu coba masukkan input ke masing-masing teks cek apakah regexnya sudah berjalan sesuai selera apa belum. Ini screenshoot ketika saya menjalankan program ini di laptop saya. Pas masukin nama pake angka maka regexnya langsung laporan kalo inputan saya salah. berikut gambarnya:

regex4

OK..segitu dulu, selamat mencoba, dan semoga berhasil :)

Menonaktifkan Tombol Start Windows

Udah lewat seminggu di kota yang tiap hari hujaaan mulu…huuuh dingin bangeet tambah lagi macet dimana-mana. Tapi tetep betah soalnya kotanya asri ( masih banyak pohon ) dan baru seminggu di sini dah keliling-keliling kota..hehehe

Minggu depan kemana yaaa..????

Sekarang saya mo posting gimana caranya agar tombol start di wndows ga bisa di klik. nah…gimana tuh caranya..tapi sebelumnya jagan dibuat untuk ngerjain temennya lhoooo..

Ok..langsung aja. Pertama buat tampilannya seperti ini :

tombol-start-windows-1

Biar bisa kaya gabar di atas tambahin 1 buah Timer dan 2 buah CommandButton ke dalam form, kemudian atus properti Command1.Caption =”Aktifkan Start” dan Command2.Caption=”Nonaftifkan Start”, trus jangan lupa buat kontrol Timer1 beri nilai properti Interval=1.

kalo sudah semua nanti jadinya seperti ini :

tombol-start-windows-2

Langkah terakhir Ketik…Eh salah

Copy Paste Code berikut di kode editor Visual Basic 6.0…..hahahahaha..klo mau ngetikin juga ga dilarang koq, hehe..

Private Const VK_ESCAPE = &H1B
Private Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event _
Lib “user32″ (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags _
As Long, ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
Timer1.Enabled = False
End Sub

Private Sub Command2_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Call keybd_event(VK_ESCAPE, 0, 0, 0)
Call keybd_event(VK_ESCAPE, 0, _
KEYEVENTF_KEYUP, 0)
End Sub

Kalo udah tinggal dijalankan. Klik tombol “Nonaktifkan Start” untuk menaonaktifkan tombol start dan klik tombol “Aktifkan Start” untuk mengaktifkannya kembali.

Saya pamit dulu…:D

Enkripsi dan Deskripsi Teks dengan Visual Basic

Enkripsi dan deskripsi teks…ya itu yang akan kita coba kali ini. Prinsipnya sebuah teks yang bersifat rahasia seperti pesan rahasia atau bisa juga surat cinta yang takut dibaca orang lain..hehehe..bisa kita enkripsikan menjadi chipertext dengan pasword tertentu, kemudian untuk membacanya lagi kita harus menggunakan pasword yang sama pula untuk mengembalikan teks yang terenkripsi menjadi plaintext atau teks awal sebelum di enkripsi.

Sekarang.. mari kita coba membuat program enkripsi dan deskripsi tersebut dengan Visual Basic 6.0.

Pertama masuk ke Visual Basic 6.0, kemudian buat project baru yaitu Standard.exe. Lalu buatlah tampilan form dengan menambahkan 1 buah Label, 2 buah TextBox dan 2 buah CommandButton sehingga menjadi seperti gambar d bawah ini :
deskripsienkripsi1

Ganti properti caption dari Label dan CommandButton, kemudian kosongkan properti Text dari Text1 dan Text2, khusus Text1 atur properti MultiLine menjadi True sehingga tampilan menjadi seperti gambar di bawah ini :
deskripsienkripsi2

Jika user interface sudah selesai langkah terakhir adalah Copy Paste Kode di bawah ini ke Kode Editor Visual Basic :

‘==========ENKRIPSI

Function EncryptText(strText, ByVal strPwd)
Dim i, c
Dim strBuff
If strPwd <> “” And strText <> “” Then
strPwd = UCase(strPwd)
If Len(strPwd) Then
For i = 1 To Len(strText)
c = Asc(Mid(strText, i, 1))
c = c + Asc(Mid(strPwd, (i Mod Len(strPwd)) + 1, 1))
strBuff = strBuff & Chr(c And &HFF)
Next
Else
strBuff = strText
End If
EncryptText = strBuff
Else
EncryptText = “”
End If
End Function

‘==========DESKRIPSI

Function DecryptText(strText, ByVal strPwd)
Dim i, c
Dim strBuff
If strPwd <> “” And strText <> “” Then
strPwd = UCase(strPwd)
If Len(strPwd) Then
For i = 1 To Len(strText)
c = Asc(Mid(strText, i, 1))
c = c – Asc(Mid(strPwd, (i Mod Len(strPwd)) + 1, 1))
strBuff = strBuff & Chr(c And &HFF)
Next
Else
strBuff = strText
End If
DecryptText = strBuff
Else
DecryptText = “”
End If
End Function

Private Sub Command1_Click()
Text1.Text = EncryptText(Text1.Text, Text2.Text)
Command1.Enabled = False
Command2.Enabled = True
End Sub

Private Sub Command2_Click()
Text1.Text = DecryptText(Text1.Text, Text2.Text)
Command1.Enabled = True
Command2.Enabled = False
End Sub

Private Sub Form_Load()
Command2.Enabled = False
End Sub

Sekarang program tinggal dijalankan. Masukkan teks yang akan dienkripsikan kemudian masukkan password dan klik tombol ENKRIPSI maka teks akan terenkripsi seperti yang ditunjukkan oleh gambar berikut :

enkripsi

Untuk mendeskripsikan ke teks awal, dengan menggunakan password yang sama kemudian klik tombol DESKRIPSI, makan teks akan kembali menjadi plaintext semula seperti pada gambar berikut :

deskripsi

Selesai…
Selamat Mencoba :)

Menyimpan Teks ke File.INI dan Menampilkannya dengan VB

Wah..ga kerasa sekarang tanggalnya dah direset jadi 01 lagi…ini postingan saya di awal februari setelah 3 hari ga ada aktivitas di blog..maklum kemaren lagi di jalan..hehe. di tempat yang baru..suasana baru.. pagi yang adeeeem banget… enaknya emang di depan komputer sambil minum teh hangat sama sarapan mmmmm..tapi karna dingin jadi males mandi hehehe…

yuuuk kita mulai ja..Menyimpan Teks ke file.INI?? Sudah tahu file.INI kan. Pokoknya ya filenya ekstensinya .INI gitu.. biasanya selain di registry, sebuah program menggunakan file ini untuk menyimpan settingan program sehingga ketika program di load kita tidak perlu melakukan setting ulang lagi.

Gimana cara kerjanya???
cara kerjanya pas kita melakukan settingan di program kemudian kita Apply atau Save maka nilai-nilai settingan tadi disimpan di file.INI, kemudian ketika program di load, program hanya tinggal mengambil nilai settingan dari file.INI kemudian diterapkan di program.

Gimana buatnya pake Visual Basic??
Nah disini kita cuma belajar gimana nyimpen data berupa teks dari program ke file.INI kemudian gimana caranya mengambil data dari file.INI trus ditampilin ke program..
Dari konsep ini nanti kita bisa menerapkannya sendiri dalam suatu program tertentu.

OK..udah lumayan ngocehnya sekarang kita mulai
1. buka Visual Basicnya trus buat new project pilih Standard.EXE
2. buatlah desain pada form dengan memasukkan 2 buah TextBox dan 2 buah CommandButton, sehinggan nanti jadi seperti ini :

file-ini

3. Biar ga bingung nanti pas menjalankan program, ganti properti Command1.Caption =”simpan ke file” dan Command2.Caption=”tampilkan nilai” sertta kosongin nilaiproperti Text pada Text1 dan Text2 sehingga tampilannya kurang lebih benarnya gini :

file-ini-2

4 Selanjutnya menuliskan Kode Program di Kode Editornya Visual Basic 6.0. Hehehehe…hayo kalo dikasih Kode seperti di bawah ini lebih milih nulis atau Copy Paste. Dicopy Paste aja biar cepet trus bisa belajar yang lain lagi. tapi ya harus tetep ngerti caranya, nah ini Kode Program Copy Paste ke Kode Editornya VB :

‘Kode untuk mengambil nilai dari file.ini

Private Declare Function GetPrivateProfileString _
Lib “kernel32″ Alias “GetPrivateProfileStringA” _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, _
ByVal lpDefault As String, ByVal lpReturnedString As String, _
ByVal nSize As Long, ByVal lpFileName As String) As Long

‘Kode untuk menuliskan nilai ke file.ini
Private Declare Function WritePrivateProfileString _
Lib “kernel32″ Alias “WritePrivateProfileStringA” _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, _
ByVal lpString As Any, ByVal lpFileName As String) As Long

‘Deklarasi file.ini, ganti nama file sesuai keinginan
Const INIFileName = “C:\file.ini”

Private Sub Command1_Click()
‘Ketika Command1 di klik makan akan menyimpan nilai
‘pada text1 dan text2 ke file.ini

Result1 = WritePrivateProfileString(“My App Name”, _
“My Key1″, Text1.Text, INIFileName)
Result2 = WritePrivateProfileString(“My App Name”, _
“My Key2″, Text2.Text, INIFileName)

End Sub

Private Sub Command2_Click()
‘Deklarasi variabel untuk menampilkan nilai dari file.ini

Dim MyValue1 As String * 20
Dim MyValue2 As String * 20

‘Ketika Command2 di klik akan menampilkan nilai dari
‘file.ini ke dalam message box

Result1 = GetPrivateProfileString(“My App Name”, _
“My Key1″, “Empty”, MyValue1, _
Len(MyValue1), INIFileName)
MsgBox MyValue1

Result2 = GetPrivateProfileString(“My App Name”, _
“My Key2″, “Empty”, MyValue2, _
Len(MyValue2), INIFileName)
MsgBox MyValue2

End Sub

5. Langkah terakhir jalankan program, kemudian masukkan nilai pada kedua textbox kemudian klik simpan program, kemudian cek di file.INInya apakah sudah masuk apa belom dengan membuka file.INI mengunakan Notepad, untuk menampilkan nilai dari file.INI klik Tampilkan nilai maka nilai akan ditampilkan melalui Message Box.

Memasukkan nilai text ke file.INI

file-ini-running

Menampilkan nilai dari file.INI

file-ini-running-2

Nah itu dulu untuk hari ini…
Selamat mencoba..

Menampilkan Kode Tombol Keyboard dan Mouse dengan Visual Basic

Dulu ketika awal-awal saya belajar Visual Basic.. saya sempat kebingungan ketika membuat sebuah program, yaitu bagaimana caranya membuat Form Login dimana ketika tombol ENTER pada keyboard ditekan maka mengecek inputan user dan password kemudian login ke Form Utama. Dengan begitu user tidak perlu mengklik tombol Login dengan mouse.

Setelah tau rahasianya…ternyata logikanya ternyata mudah sekali.
Ketika program menerima event yang namanya “Keypress”, program mengecek tombol apakah itu, jika tombol itu adalah tombol ENTER maka fungsi untuk mengecek login dijalankan.

untuk tahu tombol apa yang kita tekan program menggunakan KeyAscii atau KeyCode dari tombol keyboard tersebut. Contohnya tombol ENTER memiliki KeyAscii dan KeyCode =13.

Kurang lebih kode programnya seperti ini:

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
‘ disini letak fungsi atau pernyataan yang akan dijalankan
End If
End Sub

Berapa Kode untuk tombol SPASI,TAB, Huruf A, atau Karakter “?” ???
Susah pastinya jika kita harus menghapal semua kode tombol yang ada di keyboard kita.

Berikut ini adalah cara untuk menampilkan nilai KeyAscii dan KeyCode serta Nilai tombol Mouse di Visual Basic Form. Cara kerjanya yaitu ketika Tombol keyboard atau mouse ditekan maka program akan menampilkan Nilai Keyascii dan Keycodenya di Form.

Caranya :
1. Buatlah tampilan pada form sebagai berikut:
tampilkode

Tambahkan 6 Buah Label ke dalam form, kemudian ubah property Caption masing masing label seperti yang tertampil pada gambar di atas.

2. Copy Paste atau ketik kode berikut ini di Kode Editor :

==================================================================

‘menampilkan keycode

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Label1.Caption = KeyCode
End Sub

‘menampilkan keyascii
Private Sub Form_KeyPress(KeyAscii As Integer)
Label2.Caption = KeyAscii
End Sub

‘menampilkan mousekey
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label3.Caption = Button
End Sub

==================================================================

3. Jalankan program kemudian coba tekan sembarang tombol pada keyboard, maka akan muncul kode dari tombol tersebut di form. kurang lebih tampilannya sebagai berikut :

hasilkode

Untuk diketahui:

KEYASCII: hanya terbatas pada karakter dan simbol saja, kode untuk huruf kecil berbeda dengan huruf kapital
KEYCODE: hampir semua tombol di keyboard, satu tombol satu kode
MOUSEKEY : klik kanan, klik kiri

Semoga Bermanfaat.

Status Battery Laptop

Semua laptop atau notebook kita bisa mengetahui info battery laptop yang kita pakai, tinggal berapa persen battery kita, berapa jam lagi battery akan habis. Nah Kali ini kita akan mencoba membuat sendiri program untuk menampilkan info battery pada laptop kita dengan menggunakan Visual Basic 6.0.

download file tutor

status-battery-laptop

Membuat Web Link di VB

Tentunya sudah biasa mendengar kata “web link” yang terdapat di suatu website yang ketika di klik akan membuka alamat website lain sesuai alamat yang ada pada link tersebut, nah sekarang kita akan mencoba membuat web link di form Visual basic, caranya sangat mudah yaitu kita akan memanfaatkan fungsi shellExecute. Pada dasarnya sama saja dengan ketika kita menuliskan “explorer http://www.google.com” pada Command Promptnya windows maka akan membuka browser (seperti Internet Explorer, Mozilla Firefox) tergantung mana yang disetting default pada computer kita ) dengan alamat http://www.google.com.

Download disini

membuat-web-link-di-vb

Menutup Semua Program

Terbayangkah ketika kita sedang di depan komputer dan membuka banyak aplikasi misalnya ketika kita sedang mempelajari tutorial Pemrograman Web dengan menggunakan Macromedia Dreamwever dan aplikasi tambahan untuk membuat desiainnya seperti Adobe Photoshop, CorelDraw ataupun Macromedia Flash dari e‐book berupa PDF sambil mendengar lagu di Winamp, diselingi juga dengan menonton video tutorial tentang PHP dengan Windows Media Player, dan mencari file‐file yang dibutuhkan melalui Windows Explorer. Tiba‐tiba anda harus segera ke suatu tempat dan harus menutup semua program yang sudah anda jalankan. setidaknya perlu waktu bagi anda untuk menutup semua aplikasi yang sedang berjalan tadi. Pertanyaannya adalah bisakah kita menutup semua aplikasi tadi dalam satu kali klik mouse?. Tips n Trik kali ini akan menjawabnya, sekarang kita akan mencoba membuat program yang berfungsi menutup semua aplikasi dalam satu kali klik mouse dengan menggunakan Visual Basic 6.0 sehingga kita tidak perlu menutup program‐program tersebut satu per satu.

Download file

menutup-semua-program

Mengunci Gerakan Mouse

Mouse adalah bagian yang cukup penting dari sebuah komputer karena sebagian besar program memerlukan mouse dalam menjalankannya, meskipun sebuah program mempunyai shortcut keyboard untuk menjalankan perintahnya, akan tetapi masih banyak dan sebagian besar pengguna komputer mengunakan mouse untuk menjalankan program terutama bagi yang tidak tahu dan tidak hapal shortcut keyboard suatu program tertentu.
Sekarang kita mencoba membuat program untuk mengunci gerakan mouse sehingga pointer mouse selalu berada di tengah‐tengah layar monitor dan tidak dapat digerakkan.

donlot disini

mengunci-gerakan-mouse

Membuat Toolbar dan Statusbar

Tips n Trik kali ini adalah bagaimana cara membuat toolbar dan statusbar pada aplikasi yang dibuat dengan menggunakan Visual Basic 6.0. Toolbar yaitu tombol atau icon yang biasanya terdapat pada bagian atas aplikasi yang mewakili menu‐menu tertentu seperti menu save diwakili oleh toolbar dengan icon disket, atau menu cut dengan icon gunting. Sedangkan statusbar biasanya posisinya di bagian bawah yang fungsinya menunjukkan status seperti status Caps Lock, Num Lock, Scroll Lock, dan biasanya juga terdapat tanggal dan waktu dan lain‐lain. Pada Tips n Trik ini kita akan belajar mengimplementasikan Toolbar dan Statusbar pada aplikasi Text Editor sederhana.

donlot filenya disini

membuat-toolbar-dan-statusbar

Mencegah Perintah Ctrl+Alt+Del

Tips n Trik kali ini adalah bagaimana cara kita untuk mencegah seseorang menjalankan Windows Task Manager seperti yang sering kita alami ketika di warnet, biasanya setiap warnet mencegah clientnya untuk menjalankan Windows Task Manager supaya client tidak bisa mematikan program seenaknya seperti program billing pada warnet.

nah sekarang bagaimana caranya membuat program untuk mencegah seseorang atau teman kita masuk ke Windows Task Manager di komputer kita, caranya sangat mudah kita hanya membutuhkan dua buah komponen yaitu komponen timer dan system.

download file


melarang-ctrlaltdel

Mengganti Tombol Klik Mouse

Sebelumnya saya mau cerita, saya punya teman yang kidal dan dia sering cerita kalau komputernya dia mousenya di setting terbalik, tapi karena komputernya sering dipakai oleh temen‐temennya settingan
mousenya diubah jadi normal lagi dan dia merasa repot harus membuka control panel untuk mengubah
settingan mousenya.

Nah tips n trik kali ini adalah bagaimana caranya kita membantu temen saya agar
dia tidak kerepotan mengganti settingan mousenya. Solusinya kita akan membuat program sederhana
dengan menggunakan visual basic untuk mengubah setting tombol mouse.

download filenya


mengganti-klik-mouse

Open Close CD‐ROM

Sebelumnya kita sudah tahu bagaimana cara untuk mengetahui drive pada komputer kita beserta jenisnya, dari tips yang saya posting sebelumnnya kita bisa memanfaatkan FileSistem Object untuk mengetahui CD‐ROM pada Komputer kita kemudian dengan menambahkan beberapa fungsi kita bisa membuat program untuk membuka dan menutup CD‐ROM. Logikanya sangat mudah, pertama kita menentukan apakah suatu drive adalah CD‐ROM? kemudian jika drive tersebut benar adalah CD‐ROM maka kita panggil fungsi untuk membuka atau menutup CD‐ROM. Untuk lebih jelasnya ikuti langkahlangkah berikut :

download

open-close-cd-rom

Mengetahui Drive pada Komputer

Tips n Trik kali ini adalah bagaimana caranya mengetahui drive pada komputer serta jenis drive tersebut ( Hard Drive, CD Drive, atau Removable Drive ), Tips ini awalnya terinspirasi setelah saya membaca satu tips dari salah satu website tentang visual basic yaitu tips mengetahui CD‐ROM pada komputer.padatips kali ini kita tidak hanya mengetahui CD‐ROM saja tetapi juga Harddisk dan Removable Disk. caranya sangat mudah kita hanya perlu menggunakan FileSystemObject untuk mengetahui Drive yang ada di komputer kita.

donlot

mengetahui-drive-pada-komputer

Memainkan Animasi Flash di VB

Animasi flash adalah gambar animasi bergerak berekstensi *.swf dan biasanya dijalankan dengan menggunakan flash player. Animasi flash banyak digunakan untuk membuat banner pada website, game dan bahkan banyak aplikasi yang dibuat dengan Flash. Selain itu kita juga bisa memainkan animasi flash melalui Visual Basic yaitu dengan menggunakan komponen shockwaveFlash

download caranya

memainkan-flash-di-vb

Membuat Menu Pop‐Up

Menu pop‐up adalah menu yang muncul ketika kita mengklik kanan ketika menjalankan sebuah aplikasi, menu pop‐up juga sering disebut dengan menu shortcut atau menu konteks. Kita bisa menambahkan menu pop‐up ke dalam aplikasi yang dibuat dengan menggunakan Visual Basic yaitu dengan menggunakan Menu Editor dan Event MouseUp.

Donlot di sini


membuat-menu-pop-up.pdf

Modul Standar

Ketika membuat program yang cukup besar, kita mungkin memiliki lebih dari satu form yang menggunakan variable, prosedur atau fungsi yang sama. Misalnya kita memiliki 2 buah form yaitu Form1 dan Form2 dan ingin menampilkan tanggal beserta waktu di kedua form tersebut. maka kita bisa saja menuliskan fungsi atau prosedur untuk menampilkan tanggal dan waktu di masing‐masing form, bayangkan jika form kita lebih dari dua. Sama halnya ketika kita membuat
program yang terkoneksi database.jika ada lebih dari satu form terkoneksi database, kita bisa saja menuliskan fungsi atau procedure untuk koneksi ke database di setiap form yang ada. Tapi semua itu menjadi tidak efisien, karena banyak kode program yang sama ditulis secara berulang‐ulang. Sedangkan secara default sebuah variable sifatnya lokal dalam sebuah prosedur, dan procedur sifatnya lokal untuk form tempat diciptakannya saja. Nah… untuk mengatasi hal ini, kita bisa membuat satu variable, prosedur atau fungsi public di sebuah modul standar yang nantinya bisa dipanggil dari semua form dalam project kita.

Apa itu Modul Standar???
Modul standar bisa dikatakan sebuah file dengan ekstensi .bas dan bisa menampung variable, prosedur atau fungsi yang dapat digunakan di seluruh bagian program pada sebuah project. Berbeda dengan form module hanya bisa diberi kode program saja dan tidak bisa disisipkan objek seperti pada form.

Bagaimana membuat sebuah Modul Standar???
Bagaimana menggunakan Modul Standar di dalam sebuah Project???

Download File PDF Lengkapnya disini


visual-basic-60-chapter-10.pdf

Array dan Kontrol Array

Array adalah sekumpulan nilai yang disimpan dalam satu nama yang sama, array mengijinkan kita merujuk seluruh kelompok nilai menggunakan satu nama lalu memproses setiap nilai tersebut secara individual atau sebagai group menggunakan For … Next ataupun Loop … Do. Array sangat bermanfaat karena membantu menyimpan data yang besar dan tidak praktis jika disimpan dalam variabel biasa.

Array dibuat atau dideklarasikan dengan cara yang sama seperti pendeklarasian variabel biasa yaitu menggunakan perintah Dim, kemudian diikuti dengan tanda kurung dan jumlah elemen arraynya dikurangi 1. Setiap nilai data di dalam sebuah array disebut elemen array dan masingmasing dibedakan dengan nomor indeksnya. Perlu di ingat bahwa indeks pada array dimulai dari angka nol.
Array terdiri dari fixed array dan dynamic array, fixed array yaitu array yang mengandung jumlah elemen berukuran tetap, sedangkan dynamic array yaitu array yang mengandung jumlah elemen berupa variabel ( array yang bisa diperbesar selama eksekusi program ).

download file lengkap


visual-basic-60-chapter-9.pdf

Procedure

Procedure dikategorikan sebagai sub algoritma atau sub program yang berisi perintah‐perintah untuk melakukan tugas tertentu. Procedure efektif digunakan ketika terdapat lebih dari satu kali perintah yang sama dalam suatu program. Dengan menggunakan procedure kita tidak perlu berulangkali membuat kode yang sama, kita hanya perlu membuat satu procedure dan menuliskan sekali saja perintah tersebut di dalam procedure tadi.

Dengan penggunaan procedure ini kita hanya perlu memanggil procedure untuk menjalankan perintah di beberapa tempat yang berbeda. Selain itu, procedure akan memudahkan perbaikan kode program bila terjadi perubahan atau kesalahan, karena perbaikan cukup dilakukan pada satu bagian saja.

Donlot disini


visual-basic-60-chapter-8.pdf

Alur Program ‐ Kondisi Perulangan

Dalam pemrograman ada kalanya kita memerlukan perulangan untuk melakukan suatu perintah yang sama untuk beberapa kali, misalkan pada program untuk mencari data maka diperlukan perulangan untuk mencari data dari record awal sampai record akhir atau sampai data yang dicari ditemukan.

Dalam visual basic terdapat beberapa macam struktur kondisi perulangan, diantaranya adalah Do … Loop dan For … Next.

Download Tutorial


visual-basic-60-chapter-7.pdf

Alur Program ‐ Kondisi Percabangan

Sebuah aplikasi harus memiliki alur program yang baik sehingga tidak akan terjadi kesalahan dan hasil yang dikeluarkan oleh program tidak menyimpang dari yang diinginkan ketika program berjalan. Untuk itu perlu dibuat sebuah kondisi percabangan dalam program. Dalam Visual Basic ada beberapa kondisi percabangan yang dapat digunakan seperti IF… THEN atau SELECT CASE. Kondisi percabangan biasanya dinyatakan dengan menggunakan operator seperti operator sama dengan (=), tidak sama dengan (<>) atau operator‐operator perbadingan lainnya ( >, >=, <, <=).

Download tutor


visual-basic-60-chapter-6.pdf

Operator Matematika

Dalam pemrograman kita tidak hanya sekedar mempelajari bahasa pemrogramannya saja, banyak hal yang harus dipelajari seperti salah satunya adalah Operator Matematika. Dalam bahasa pemrograman Operator Matematika dapat diartikan sebagai symbol yang digunakan untuk melakukan operasi terhadap nilai data. Operator dalam bahasa pemrograman dapat berupa karakter ataupun berupa kata khusus yang melambangkan satu operasi tertentu, misalnya operator untuk operasi penjumlahan (+), pengurangan(‐),pembagian(/),perkalian(*) dan sebagainya.

Download


visual-basic-60-chapter-5.pdf

Tipe Data, Variabel, dan Konstanta

Data memiliki tipe yang berbeda‐beda dan biasanya data dikelompokkan pada kelompok yang sejenis agar tidak terjadi operasi matematika diantara data yang berbeda jenis tersebut, contohnya kita tidak bisa menjumlahkan nilai suatu jarak (Km) dengan Massa (Kg) karena keduanya memiliki tipe data yang berbeda. Begitu juga dalam suatu program, setiap nilai harus dikelompokkan pada jenis‐jenis tertentu yang disebut dengan tipe data.
Setiap data yang disimpan dalam komputer memerlukan variabel sebagai sesuatu tempat untuk menyimpan nilai dari data tersebut, dan nilainya suatu variable dapat berubah‐ubah selama proses program.misalnya kita bisa menyimpan nilai ujian mid di variable A dan nilai ujian akhir di variable B, dan setiap mahasiswa nilainya pasti berbeda.

donlot disini


visual-basic-60-chapter-4.pdf

Setting Properties di Kode Program

Selain bisa diatur melalui properties window kita juga dapat mengatur property sebuah komponen/objek di kode program. Dalam visual basic 6.0 penulisan kode biasanya selalu di awali dengan nama objek menudian dipisah oleh tanda dot (.) baru diikuti oleh method atau property dan valuenya.

Download pdfnya


visual-basic-60-chapter-31.pdf

User Interface, Property, dan Event

Tahap pertama dalam membangun sebuah aplikasi berbasis GUI ( Graphical User Interface ) yaitu membuat User Interfacenya terlebih dahulu. User Interface adalah tampilan/antarmuka dari sebuah program yang berfungsi sebagai penghubung antara program dengan pengguna ( user ).

donwload aja ya… bis bingung mo nulis apa..

Mengenal Visual Basic 6.0

Visual Basic adalah salah satu bahasa pemrograman komputer yang sudah mendukung OOP (Object Oriented Programming ) dan merupakan bahasa pemrograman berbasis GUI (Graphical User Interface ).Visual Basic adalah pengembangan dari bahasa pendahulunya yaitu bahasa pemrograman BASIC ( Beginner’s All Purpoe Symbolic Instruction Code ). Visual Basic merupakan salah satu alat bantu ( Development Tool ) dalam pembuatan berbagai macam program komputer, khususnya program komputer yang berbasis sistem operasi
Windows. tutornya dah tak buat dalam bentuk pdf tinggal donload disini :

visual-basic-60-chapter-1.pdf