Visual Basic .Net 2010 - TextBox Hanya Berisi Angka

Sewaktu membuat program atau aplikasi, terkadang kita membutuhkan validasi. Di mana untuk pengisian form tertentu ada kolom  yang hanya boleh diisi Angka saja. Contohnya kolom Nomer Telepon, Harga Barang, Jumlah dan lain-lain. Memang kita bisa menggunakan pesan sebagai validasi, namun itu kurang efektif. Sebelum mempelajari artikel ini, ada baiknya anda membaca artikel Mencari Nilai ASCII. Karena untuk membuat TextBox hanya dapat berisi angka saja, kita akan menggunakan ASCII dari tombol-tombol keyboard yang sudah dibahas pada artikel sebelumnya di sini. Kalau sudah paham apa itu ASCII, sekarang mari kita buat dengan tahapan-tahapan berikut ini:

• Buka Visual Studio 2010 dan buat project baru
• Letakan sebuah Label dan TextBox di Form1
• Ubah Properties Text Label menjadi Hanya Angka dan ubah Properties Name TextBox1 menjadi txtHanyaAngka
• Hasilnya seperti gambar berikut:

• Lalu pada jendela code ketikan code ini di even keypress: If Not ((e.KeyChar >= Chr(48) And e.KeyChar <= Chr(57)) Or e.KeyChar = Chr(13) Or e.KeyChar = Chr(8) Or e.KeyChar = Chr(32) Or e.KeyChar = Chr(44) Or e.KeyChar = Chr(46)) Then e.KeyChar = Chr(0)

•  Untuk lebih jelasnya lihat gambar berikut:

• Jalankan programnya dan coba anda ketikan huruf yang bukan angka, jika masih bisa maka apa yang anda buat masih salah. Jika berhasil, TextBox tersebut hanya bisa diketikan Angka 0 sampai dengan 9,  tombol Enter, tombol Backspace, Tanda Koma, Tanda Titik, dan Spasi, seperti gambar di bawah ini:

Jika artikel ini bermanfaat, berikan komentar anda di bawah ini ya.... Terima Kasih atas kunjungannya... DBonis

Baca Selengkapnya »

Visual Basic .Net 2010 - Mencari Nilai ASCII

ASCII singkatan dari American Standard Code for Information Interchange. Komputer hanya dapat memahami nomor , sehingga kode ASCII adalah representasi numerik dari karakter seperti 'a' atau ' @ ' atau tombol keyboard lainnya. Jadi setiap tombol pada keyboard memiliki nilai ASCII yang berupa angka dari 1 sampai 255.
Terkadang dalam membuat Aplikasi kita perlu mengetahui nilai ASCII dari tombol-tombol pada keyboard komputer. Misalnya kita ingin jika menekan tombol ENTER maka even yang terjadi adalah pindah dari satu control ke control lainnya atau langsung menyimpan data ke database. Hal itu bisa kita buat dengan cara mengetahui dulu nilai ASCII dari tombol ENTER itu berapa?
Baiklah kita langsung saja buat projectnya, tahapannya adalah:

• Buat Project baru dan beri nama sesuai keinginan anda atau biar lebih mudah bisa diberi nama Key ASCII
• Pada Form1, letakan sebuah label dan sebuah textbox. Buat seperti gambar berikut:

• Ubah Nama Textboxnya menjadi txtCariKeyAscii 
• Double Klik txtCariKeyAscii, di jendela code pada Even Keypress ketikan code ini MsgBox(Asc(e.KeyChar)) atau untuk lebih jelaskannya lihat gambar di bawah ini:

• Sekarang jalankan programnya lalu pastikan focus di txtCariKeyAscii (kursor/karet pada txtCariKeyAscii berkedip-kedip) lalu anda tekan tombol ENTER maka akan tampil pesan yang menyatakan bahwa  ASCII dari tombol ENTER adalah 13 seperti gambar di bawah ini:

Jika artikel ini bermanfaat, berikan komentar anda di bawah ini ya.... Terima Kasih atas kunjungannya... DBonis

Baca Selengkapnya »

Visual Basic .Net 2010 - Embed / Menampilkan File berextensi SWF

File berextensi SWF atau Shockwave Flash merupakan file multimedia yang dibuat di Adobe Flash. Biasanya merupakan file animasi atau games berbasis Flash. Terkadang kita ingin ada animasi di form Aplikasi yang kita buat. Bisa juga merupakan Custom dari client kita yang menginginkan logo perusahaannya merupakan logo animasi. Nah... cara mudah menampilkannya di Visual Basic .Net 2010 adalah dengan memakai plugin dari SWF player. Pastikan bahwa Adobe Flash Player telah terinstall di PC atau Notebook anda. Karena kita akan menggunakannya di VB.Net 2010.
Langkah-langkah membuatnya adalah sebagai berikut:

• Buka Visual Studio 2010
• Buat Project Baru dan beri nama pada kolom Name SWF seperti gambar di bawah ini:

• Beri nama Form1 dengan nama frmSWF
• Untuk menambahkan tool control Shockwave Flash ke Toolbox, klik Menu Tool lalu pilih Choose Toolbox Items. atau bisa juga dengan cara klik pada toolbox lalu klik kanan di area toolbox dan pilih Choose Items seperti gambar di bawah ini:

• Setelah itu akan tampil jendela Choose Toolbox Items. Pilih COM Components lalu cari komponen Shockwave Flash Object. Beri tanda centang pada kotak disebelah komponen Shockwave Flash Object lalu klik tombol OK seperti gambar berikut ini:

• Maka komponen Shockwave Flash Object akan ditambahkan pada jendela Toolbox seperti gambar di bawah ini:

• Lalu letakan komponen Shockwave Flash Object tadi di form frmSWF serta samakan ukuran lebar dan tinginya dengan lebar dan tingginya file SWF yang akan dipasang. Lihat  gambar berikut ini:

• DBonis mengubah nama komponen AxShockwaveFlash1 tadi dengan nama axSWF. Direkomendasikan bagi anda yang masih pemula di VB.Net sebaiknya nama komponennya disamakan dengan DBonis yaitu axSWF pada Jendela Propertiesnya agar pada saat pemanggilan di jendela codingnya sama dan tidak terjadi Error. Lihat gambar Jendela Properties di bawah ini:

• Sekarang buka jendela coding dari frmSWF. Pada Even frmSWF_Load ketikan coding ini axSWF.Movie = Application.StartupPath & "\Video\Talking-Tom.swf" lihat gambar di bawah ini:

• Tulisan yang berwarna merah harus anda ganti dengan alamat dan nama file SWF yang akan anda pasang. Caranya anda buat folder dengan nama Video lalu anda copy file Videonya ke dalam folder Video tadi. Setelah itu copy folder video tadi dan pastekan di folder project anda tadi yaitu masuk folder SWF lalu folder Bin lalu folder Debug, pastekan di folder Debug ini. Jadi alamat filenya adalah SWF\Bin\Debug\Video\Nama File SWF Anda.swf.

• Running program anda untuk melihat hasilnya.....

Jika artikel ini bermanfaat, berikan komentar anda di bawah ini ya.... Terima Kasih atas kunjungannya... DBonis

Baca juga Artikel Terkait di bawah ini:

• Visual Basic .Net 2010 - Embed / Menampilkan File Video

Baca Selengkapnya »