Sdr Ronal BH,
Kl saya, saya pake 2 textbox. 1 textbox berisi nilai yg dimasukkan, textbox yg 
satunya lagi dihiden. 

lostfocus text1 :
    text2 = isi dari text1
    text1 = format(val(text2),"###,###,##0.#0") '---misalnya

tiap gotfocus :
    text1=text2
 
saat disimpan, gunakan nilai dari text2.


demikian , mungkin cara diatas sangat konvensional. 

salam,
nyom2



  ----- Original Message ----- 
  From: Ronal Baharuddin Hutagaol 
  To: [email protected] 
  Sent: Friday, July 13, 2007 1:46 PM
  Subject: [Programmer-VB] Format Currency



  Dear VB Mania...
   
  Sampai sekarang saya masih bingung nih untuk menampilkan format uang.
   
  Misalnya di TEXT1.TEXT saya input 20000
  Nah, omotatis angkat itu terlihat dilayar menjadi 20.000
  Nah, komputer tetap membaca 20.000 itu adalah 20000 agar dapat dilakukan 
perkalian atau penjumlahan bilangan.
   
  Nah hal ini juga berlaku ketika kita masukkan ke LABEL1.CAPTION atau 
MSFLEXGRID1, dll...
   
  Kira2 ada solusi untuk permasalahan ini.
   
   
  Terima KASIH b-4

   

Kirim email ke