
Hai.. sobat belajarhebat berjumpa lagi dengan saya, kali ini saya akan memberikan tutorial bagaimana Cara Membuat Captcha di vb net.
Langkah langkah:
- Masukkan 1 textbox dan 1 button ke form
- Lalu atur seperti gambar dibawah
- Jika sudah double klik pada button1 dan lalu beri kode berikut
Dim pool As String = “abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789”
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim count = 0
TextBox1.Text = “”
Dim cc As New Random
Dim strpos = “”
While count <= 18
strpos = cc.Next(0, pool.Length)
TextBox1.Text = TextBox1.Text & pool(strpos)
count = count + 1
End While
- Jika sudah klik run (f5)
Mudah sekali bukan!!, nah sekian dari saya semoga bermanfaat bagi anda semua. salam HEBAT!!.
video tutorial: