Validasi Inputan Angka dan Karakter

Validasi sangatlah diperlukan untuk menjaga data yang masuk ke dalam database sesuai dengan yang diharapkan. Dalam pemrograman database dekstop validasi dapat dilakukan dengan beberapa cara

1. Saat pembuatan tabel

jangan lupa memberikan kunci primary key, foreign key, set null/ not null karena ini sangatlah membantu dalam proses coding dan efisiensi coding

2. Saat penambahan komponen kedalam Form

kita perlu memperhatikan entitas/propertis mana yang bisa kita maksimalkan

misal properti max, format dll sesuai dengan masing-masing komponen

3. Pemasangan triger apabila melibatkan 2 tabel yang tidak terhandle oleh point 1 dan 2

4. Validasi dengan memanfaatkan even dari komponen yang kita pakai

Dari beberapa cara diatas, akan saya bahas tentang point 4

yaitu untuk validasi inputan angka dan karakter dengan menggunakan komponen TextEdit. Berikut langkah-langkahnya

1. letakkan komponen TextEdit kedalam Form

2. klik 2x komponen TextEdit dan pilih even OnKeyPress

3. ketik/masukkan syntax dibawah ini didalam even OnKeyPress

Const Number = "0123456789" 'untuk angka

Const Character = "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz " 'untuk huruf

If KeyAscii <> 8 And KeyAscii <> 13 Then

If InStr(Number, Chr(KeyAscii)) = 0 Then

KeyAscii = 0

Exit Sub

End If

End If

4. Perintah Const dapat kita tuliskan di bagian General variabel jika ingin bisa dibaca di luar method OnKeypress dari TextEdit ini

5. Done, Selamat Bekerja dan Berkreasi

Menambahkan Tanda Kurung Buka dan Tutup

Tutorial sederhana ini tentang menambahkan tanda kurung buka dan tanda kurung tutup di antara output yang akan kita proses dalam VB/Visual Basic.

Hasil yang akan kita coba peroleh adalah seperti ini.

(1,2) dengan inputan 1,2,3

Langkah-langkahnya :

1. kita perlu variabel untuk menampung isian data

misal Dim inputan as String / Dim inputan$

kedua syntax diatas sama fungsinya ( tanda "$" dalam VB merupakan cara cepat menulis tipe variabel String

2. Isikan data 1,2,3 kedalam variabel

misal inputan="1,2,3"

3. Kita memanipulasi variabel inputan tadi dengan cara seperti ini

inputan="("&mid(inputan,1,len(inputan)-2)&")"

atau

inputan="("&left(inputan,3)&")"

penjelasan :

a. untuk memotong/mengambil data tipe string kita bisa menggunakan perintah standart seperti Left, Mid maupun Right

b. kita cermati hasil dan kita bandingkan dengan inputan

c. kita dapat menarik kesimpulan hasil hanya terdiri dari 3 karakter dari huruf pertama

d. dari analisa tersebut kita bisa menggunakan perintah left atau kombinasi

e. perintah left dari contoh diatas cukup jelas

f. perintah kombinasi diatas dapat saya jelas sedikit

kalau diterjemahkan dalam perintah standart mid seperti ini

"("&mid(inputan,1,3)&")"

nah perintah len(inputan)-2)=3

yang dapat diartikan kita mengambil karakter dimulai dari suku pertama sampai suku ketiga

4. done, Selamat Mencoba dan Berkreasi