VB 2005 : Angka Terbilang Library – Penerjemah angka kedalam kata-kata

Angka Terbilang Library (KWATerbilang.dll) adalah library yang berfungsi untuk menerjemahkan angka kedalam bentuk kata-kata.
Contoh : 25,000 menjadi Dua Puluh Lima Ribu, 160,500 menjadi Seratus Enam Puluh Ribu Lima Ratus.

Penerjemah ini biasa saya gunakan pada modul cetak kwitansi pembayaran yang biasanya berisi terbilang dari jumlah yang dibayarkan.

Library ini dibuat menggunakan VB 2005 yang tentunya berbasis .Net Framework 2.0 dan telah diterapkan dibeberapa project yang menggunakan VB 2005. untuk VB 2003 yang berbasis .Net Framework 1.0 dan VB 2008 yang berbasis .Net Framework 3.0/3.5 saya belum pernah mengetesnya, tetapi seharusnya berjalan normal, karena dibuat menggunakan bahasa standar VB .Net. Library ini tidak bisa digunakan pada VB 6, karena banyak perbedaan yang signifikan diantara versi VB tersebut.

Range angka yang dapat ditangani adalah bilangan bulan antara 0 - triliun, karena diatas itu saya nggak tau lagi istilahnya dan juga nggak bisa membayangkan kalau punya uang diatas nilai tersebut he..he..

Library dapat didownload di http://astawan008.googlepages.com/KWATerbilang.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

Cara Penggunaan  Library

Silahkan download dan copy file KWATerbilang.dll ke komputer anda, lalu load library melalui menu Project – Add Reference, masuk ke tab Browse, lalu cari file library yang telah anda copy tadi, jika telah ditemukan, pilih dan tekan tombol OK.

Contoh coding penerapan pada aplikasi :

Sub main()
' buat object instant dari kwaTerbilang
    Dim at As New KwaTerbilang.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

Filed under: VB .Net