Cara Membuat Validasi Email dalam TextBox di VB 6.0

Membuat Validasi Email berfungsi untuk memastikan bahwa data email yang dimasukan itu benar atau valid supaya nanti tidak ada pesan email yang tidak terkirim dengan baik. Nah jika aplikasi kalian menggunakan VB 6.0, ini penting nih terapin di aplikasi yang kalian buat yang tentunya ada data email yang diinputkan dan bagaimana cara membuatnya? ayuk kita lanjut ke tutorialnya...

Cara Membuat Validasi Email dalam TextBox di VB 6.0

Langkah 1
Buatlah sebuah project aplikasi baru, kemudian tambahkan Label dan Textbox ke dalam desain form lalu atur posisinya hingga seperti ini :

Cara Membuat Validasi Email dalam TextBox di VB 6.0

Langkah 2
Sebelum kita lanjut kebagian coding, kita tambahakan dulu referensi Microsoft VBScript Regular Expressions 5.5 kedalam project dengan cara pilih menu Project > References lalu beri ceklis referensinya seperti ini, jika sudah klik OK.

Cara Membuat Validasi Email dalam TextBox di VB 6.0

Langkah 3
Lanjut kebagian coding, doubleklik pada command Cek Email seperti ini :

Cara Membuat Validasi Email dalam TextBox di VB 6.0

Lalu masukkan code program seperti ini :
Private Sub Command1_Click()
Set email = CreateObject("VBScript.RegExp")
email.IgnoreCase = True
email.Pattern = "^[\w-\.]+@\w+\.\w+$"
email = email.Test(Text1.Text)
If email = True Then
    MsgBox "Email yang dimasukkan BENAR"
Else
    MsgBox "Email yang dimasukkan SALAH"
End If
End Sub
Jika sudah selesai silahkan jalankan aplikasi dan hasilnya kurang lebih seperti ini :

Cara Membuat Validasi Email dalam TextBox di VB 6.0

Selesai...

Gimana gampang kan bikinnya? Sekian tutorial Cara Membuat Validasi Email dalam TextBox di VB 6.0, seperti biasa jika ada yang masih bingung dengan tutorial saya bagikan kali ini silahkan tanyakan di kolom komentar ya. Terimakasih, selamat mencoba dan semoga bermanfaat...

Belum ada Komentar untuk "Cara Membuat Validasi Email dalam TextBox di VB 6.0"

Posting Komentar

Silahkan tuliskan komentar Kamu yang sesuai dengan isi topik postingan halaman ini. Please don't SPAM!

Iklan Atas Artikel

Iklan Tengah Artikel 1

Iklan Tengah Artikel 2

Iklan Bawah Artikel