Skip to main content

Validasi Abjad Pada Textbox Vb Net

Dalam membuat suatu sistem informasi atau sebuah program diperlukan adanya sebuah validasi,validasi dibuat supaya mengurangi kesalahan pada saat kita menggunakan sebuah program
kali ini saya akan membbagikan bagaimana sebuah textbox hanya dapat diisi dengan huruf saja
pertama rancang lah sebuah form
Contoh :
Langkah Selanjutnya Double Click Textbox tersebut,lalu pada pendeklarasainnya pilih KeyPress dan isikan kode berikut :
 Dim KeyAscii As Short = Asc(e.KeyChar)
        If (e.KeyChar Like "[A-Za-z]" _
                OrElse KeyAscii = Keys.Back _
                OrElse KeyAscii = Keys.Return _
                OrElse KeyAscii = Keys.Space _
                OrElse KeyAscii = Keys.Delete) Then
            KeyAscii = 0
        End If
        e.Handled = CBool(KeyAscii)

Ok sekian,itulah cara bagaimanamembuat validasi huruf pada textbox Di vb Net

Comments

Popular posts from this blog

Disclaimer

Disclaimer for Daniel Fernando If you require any more information or have any questions about our site's disclaimer, please feel free to contact us by email at Danielbadung73@gmail.com Disclaimers for Daniel Fernando All the information on this website - www.nandoe73.blogspot.com - is published in good faith and for general information purpose only. Daniel Fernando does not make any warranties about the completeness, reliability and accuracy of this information. Any action you take upon the information you find on this website (Daniel Fernando), is strictly at your own risk. Daniel Fernando will not be liable for any losses and/or damages in connection with the use of our website. Our Disclaimer was generated with the help of the Disclaimer Generator and the Privacy Policy Generator . From our website, you can visit other websites by following hyperlinks to such external sites. While we strive to provide only quality links to useful and ethical websites, we have no contro...

Cara Membuat Auto Number Dengan DatagridView Pada Visual Studio 2008

Private Sub AutoNumberRowsForGridView() ' membuat no otomatis pada datagridview         If DG IsNot Nothing Then             Dim count As Integer = 0             While (count <= (DG.Rows.Count - 2))                DG.Rows(count).HeaderCell.Value = String.Format((count + 1).ToString(), "0")                 count += 1             End While

BIlangan Ganjil Genap Di PHP

Selamat pagi semuanya hari ini saya mau sharing ini materi pelajaran ane sebenarnya waktu semester 4 tentang PHP , nah kebetulan ini salah tugas kuis kemaren gan. nah untuk pembelajaran saya akan membagikan Source Kode Nya Happy Coding <html> <head> <title>OUTPUT</title> </head> <body> <? $bilangan = $_POST['bilangan']; if($bilangan != ""){ if($bilangan%2 == 0){ echo "$bilangan adalah Bilangan Genap"; } else { echo "$bilangan adalah Bilangan Ganjil"; } } else{ echo "Inputkan Angka!"; } ?> </body> </html>