Hallo teman,

Saya ada pertanyaan mengenai format curency di msgbox
mohon bantuan kiranya cara untuk memformatnya
Berikut ini adalah penggalam macronya dan terima kasih banyak 
sebelum dan sesudahnya


Dim Harga1 As String, Harga2 As String
' Harga1 dan harga2 sebenarnya bukan konstanta tetapi dalam contoh
' ini saya menggunakan konstanta


Private Sub CommandButton1_Click()
Harga1 = 10200000
Harga2 = 500000
MsgBox " minta tolong tampilan format dibawah ini gimana sih?" & _
vbNewLine & " Inginnya Harga yang tampil adalah 10,200,000 dan 
500,000" & _
vbNewLine & " Kalo bisa tampilann dengan format Currency akan lebih 
baik spt Rp. 10,200,000.- dan Rp. 500,000.-" & _
vbNewLine & " sementara yang tampil hasilnya seperti ini: " & _
vbNewLine & " Harga 1 = " & Harga1 & _
vbNewLine & " Harga 2 = " & Harga2

End Sub


Kirim email ke