Berikut ini adalah cara melakukan validasi terhadap textbox, yaitu hanya huruf kecil yang boleh diinput ke textbox di visual basic 6, untuk mempraktekannya siapkan :
1. Buat 1 Project baru dengan 1 Form dan 2 Textbox.2. Copy-kan coding berikut ke dalam editor form yang bertalian.
Private Sub Text1_Change() 'Text1 menggunakan event Change
Dim posisi As Integer
posisi = Text1.SelStart
Text1.Text = LCase(Text1.Text)
Text1.SelStart = posisi
End Sub
Private Sub Text2_KeyPress(KeyAscii As Integer) 'Text2 menggunakan KeyPress
KeyAscii = Asc(LCase(Chr(KeyAscii)))
End Sub
Tags:
contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module
0 komentar:
Posting Komentar