Coba ini Private Sub txtBayar_Change(Index As Integer) If Len(txtBayar(Index).Text) = 0 Then txtBayar(Index).Text = "0" txtBayar(Index).Text = FormatNumber(CCur(txtBayar(Index).Text), 0) txtBayar(Index).SelStart = Len(txtBayar(Index).Text) End Sub
semoga membantu ----- Original Message ----- From: "yusfen fendi" <[EMAIL PROTECTED]> To: <[email protected]> Sent: Wednesday, April 25, 2007 8:13 PM Subject: [indoprog-vb] textbox currency > hai rekan2 semua > mohon bantuanya dong, bagaimana cara buat textbox klau diisiin angka langsung otomatis > isi koma mata uang, kayak dikasir2 itu lo.pas ketik pembayaran. > terimaksih > > regards, > efendi > > >
