untuk perhitungan mata uang anda tidak perlu memformat, tetapi pakai variabel
misalnya untuk input anda bisa memakai format yg anda buat Text2.Text = Format(Text1.Text, "###,###,###.00") tetapi ada baiknya anda simpan data tersebut dalam variabel misal : Dim var As Integer 'untuk variabel anda Private Sub Form_Load() var = 0 End Sub Private Sub Text1_GotFocus() Text1.Text = var End Sub Private Sub Text1_LostFocus() var = Text1.Text Text1.Text = Format(var, "#,###,###") End Sub jadi var bisa dipakai kapanpun dan anda bisa gunakan untuk menyimpan data dalam database, jangan menyimpan data dalam bentuk format tadi karena data berubah menjadi bentuk string semoga dapat membantu anda ------------------------ Yahoo! Groups Sponsor --------------------~--> Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life. http://us.click.yahoo.com/A77XvD/vlQLAA/TtwFAA/k7folB/TM --------------------------------------------------------------------~-> Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/Programmer-VB/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
