1582 Views

Cara Membuat Random Huruf di vb.net

logo-visual-basic

Hai.. sobat belajarhebat berjumpa lagi dengan saya, kali ini saya akan memberikan tutorial bagaimana Cara Membuat Random Huruf di vb net.

Langkah langkah:

  • Masukkan 1 button dan 1 textbox ke form dan susun seperti gambar dibawah ini

random

  • Double klik pada button1 dan masukkan kode dibawah ini

Public Class Form1

Dim pool As String = “abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ”

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

End Sub

End Class

  • Jika sudah klik run (f5)

Mudah sekali bukan!!, nah sekian dari saya semoga bermanfaat bagi anda semua. salam HEBAT!!.

video tutorial:

Share
You can leave a response, or trackback from your own site.

Leave a Reply