Konversi Heksadesimal Menjadi Desimal Pada VB 6

   Heksadesimal atau sistem bilangan basis 16 adalah sebuah sistem bilangan yang menggunakan 16 simbol. Berbeda dengan sistem bilangan desimal, simbol yang digunakan dari sistem ini adalah angka 0 sampai 9, ditambah dengan 6 simbol lainnya dengan menggunakan huruf A hingga F. Sistem bilangan ini digunakan untuk menampilkan nilai alamat memori dalam pemrograman komputer. Nilai desimal yang setara dengan setiap simbol tersebut diperlihatkan pada tabel berikut:

Baca selengkapnya >> Konversi Dari Heksadesimal Ke Desimal

   Kita kembali ke permasalahan kita yaitu bagaimana caranya membuat konversi tersebut menggunakan Visual Basic 6.
   Langkah pertama yaitu tambahkan sebuah komponen TextBox dan sebuah CommandButton dalam Form anda. Kemudian set property Caption pada CommandButton sesuai dengan keinginan anda, dalam contoh ini saya memberikan Caption nya yaitu dengan nama Konversi.
   Selanjutnya dobel klik CommandButton lalu ketikkan kode berikut:


Private Sub Command1_Click()
    strhexvalue = Text1.Text
    MsgBox Val("&H" + strhexvalue), vbInformation, "Heksadesimal To desimal"
End Sub

Adapun gambaran dari source ini yaitu seperti gambar dibawah ini:

Klik gambar untuk memperbesar

Selamat mencoba dan semoga sukses. Untuk lebih jelasnya silahkan anda download Full Source di bawah ini.