VB6 : Angka Terbilang Library – Penerjemah angka kedalam kata-kata

Posted: Mei 15, 2008 in VB 6

Angka Terbilang Library (KWATerbilang6.dll) adalah library yang berfungsi untuk menerjemahkan angka kedalam bentuk kata-kata untuk VB 6. Fungsi dan penggunaanya hampir sama dengan KWATebilang.dll untuk .Net (VB 2005 : Angka Terbilang Library – Penerjemah angka kedalam kata-kata).
Library dapat didownload di http://astawan008.googlepages.com/KWATerbilang6.dll dan bebas digunakan pada project anda, baik komersil maupun tidak.

Jika ada bug error silahkan anda kirim bug error tersebut ke email saya di astawan008@gmail.com

Silahkan download dan copy file KWATerbilang6.dll ke komputer anda, lalu load library melalui menu Project – Reference, tekan tombol Browse, lalu cari file library yang telah anda copy tadi, jika telah ditemukan, pilih dan tekan tombol OK, setelah itu akan daftar Available Reference akan muncul KWATerbilang Library for VB 6.

Cara lain untuk meregistrasikan library adalah, copy library ke direktori sistem anda (ex: c:\windows\system32), lalu masuk ke Command Prompt kemudian ketikan regsvr32  c:\windows\system32\KWATerbilang6.dll, tekan Enter.

Contoh coding penerapan pada aplikasi VB 6:

Sub main()
    ' buat object instant dari kwaTerbilang
    Dim at As New KwaTerbilang6.cKWATerbilang

    Dim angka As Double
    Dim angkaTerbilang As String

    angka = 1545600
    ' terjemahkan angka menggunakan method KwaTerbilang
    angkaTerbilang = at.KwaTerbilang(angka)

    ' hasilnya adalah "Satu Juta Lima Ratus Empat Puluh Lima Ribu Enam Ratus"
End Sub

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s