Program VB Net Agar TextBox Hanya Menerima Angka

Rabu, 20 Maret 2013 | 11:15 WIB | Dibaca : 5023 kali | Kategori : Prog VB.NET
Program VB Net Agar TextBox Hanya Menerima Angka

Nah bekerja dengan nilai angka pada pemrograman VB Net tentu sering dilakukan. Misalnya pada suatu Textbox tidak bisa diisi huruf, kecuali angka.

Berikut merupakan program vb net agar textbox hanya menerima angka :

Public Class Form1
    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        Dim tombol As Integer = Asc(e.KeyChar)
        If Not (((tombol >= 48) And (tombol <= 57)) Or (tombol = 8)) Then
            e.Handled = True
        End If
    End Sub
End Class


Penjelasan :

Tombol merupakan variabel untuk menerima keyboard yang ditekan

Asc(e.Keychar) merupakan perintah untuk merubah nilai tombol keyboard yang ditekan ke nilai ASCII

Tombol >=48 agar tombol diatas sama dengan 0, 1, 2, 3, 4, 5, 6, 7, 8, 9

Tombol <=57 merupakan tombol yang sama atau di bawah angka 9

Tombol = 8 merupakan tombol Backspace

Cukup mudah bukan program vb net agar textbox hanya menerima angka?

Yuk Belajar Bahasa Pemrograman Visual Basic dot Net

Tag : Program VB Net Agar TextBox Hanya Menerima Angka, Program VB Net, Program Menerima Angka


Bila berita ini bermanfaat silahkan share Program VB Net Agar TextBox Hanya Menerima Angka ini dengan teman anda, Terima kasih sebelumnya

Berikan Komentar Anda Pada Berita Program VB Net Agar TextBox Hanya Menerima Angka

Anda berada di halaman Program VB Net Agar TextBox Hanya Menerima Angka, dan telah membaca artikel Program VB Net Agar TextBox Hanya Menerima Angka. Artikel Program VB Net Agar TextBox Hanya Menerima Angka bisa anda peroleh pada halaman http://www.mesran.web.id/berita-599-program-vb-net-agar-textbox-hanya-menerima-angka.html . Anda bisa meng-COPY/PASTE artikel ini dengan meletakkan link Program VB Net Agar TextBox Hanya Menerima Angka sebagai sumbernya.
Web Rekomendasi
Publikasi Ilmiah
 Copyright (c) 2011 - 2018 mesran.web.id