Saudara Juned coba script dibawah ini :
Semoga membantu ya ... :)
Public Function Terbilang(Angka As Double) As String
Dim strJmlHuruf$, intPecahan As Integer, strPecahan$, Urai$, Bill$, strTot$,
Bil2$
Dim X As Integer, Y As Integer, z As Integer
Dim Bil1 As String
If IsNull(Angka) Then
Terima kasih
sudah di coba dan berhasil
Note: forwarded message attached.
-
Ahhh...imagining that irresistible new car smell?
Check outnew cars at Yahoo! Autos.
[Non-text portions of this message have been removed]