Konversi Hexadesimal ke Desimal (VB 6.0)

Karena tidak ada kegiatan yang berarti pada malam minggu ini, saya akan bagikan sebuah kode program VB 6.0 (Visual Basic 6.0) yang cukup berguna. Aplikasi saya bagikan untuk temen-teman yang belum/tidak tahu cara untuk mengkonversi Nilai Hexadesimal ke dalam Nilai Desimal.


Ok, langsung saja ke langkah pembuatan aplikasinya.

Berikut ini langkah pembuatannya.

1. Buat Project VB 6.0 baru.
2. Pada Form yang aktif tambahkan 2 Label, 2 Textbox, dan 1 Commandbutton.
3. Atur Properties masing-masing label dengan Caption=Hexadesimal: dan Caption=Desimal:.
4. Atur Properties Textbox pertama dengan Name=txtHex.
5. Atur Properties Textbox kedua dengan Name=txtDes dan Locked=True.
6. Atur Properties Commandbutton dengan Name=cmdK dan Caption=Konversi.
7. Klik 2x Tombol "Konversi" dan pada cmdK_Click() ketikkan kode di bawah ini.

Me.txtDes.Text = Val("&H" + Me.txtHex.Text)

8. Jalankan program dan lihat hasilnya. Selesai.

Anda dapat mendownload contoh programnya disini.
Jangan lupa baca artikel selanjutnya yang berkaitan dengan judul Konversi Desimal ke Hexadesimal.