Forums before death by AOL, social media and spammers... "We can't have nice things"
|    comp.lang.visual.basic    |    MS Visual Basic discussions, NOT dot-net    |    10,840 messages    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
|    Message 9,361 of 10,840    |
|    Elef to All    |
|    Re: Currency Text Box in Excel Form    |
|    28 Mar 05 20:31:22    |
   
   From: m.p.b@*toglimi*rocketmail.com   
      
   Private Sub Text1_LostFocus() 'you may also test with Change event   
    on error resume next 'to avoid errors   
    text1.text=format(ccur("0" & text1.text),"#.##0,00") 'the "0" prefix is   
   to allow convertion to zero when text1 is empty   
   End Sub   
      
   Bye   
   Elef   
      
   "DaveA"
|
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
(c) 1994, bbs@darkrealms.ca