v\:* {behavior:url(#default#VML);}o\:* {behavior:url(#default#VML);}w\:* 
{behavior:url(#default#VML);}..shape 
{behavior:url(#default#VML);}st1\:*{behavior:url(#default#ieooui) }     
Dim iSplt

iSplt = split(text1.text,”,”)

 

text3.text = isplit(0)

 

---------------------------------


From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of budi 
budi
Sent: Tuesday, February 20, 200716:31
To: [email protected]
Subject: [Programmer-VB] CariAngka Desimal


 

Dear Netter VB,


 


Saya minta Bantuan untuk mencari nilai desimal dari sebuah angka 


text1.text = "900,12"


 


saya hanya butuh desimal yg bisa saya pakai 


text2.text = "0,12"


 


text3.text = text1.text - text2.text


 


akhirnya saya dapat nilai text3.text = "900" murni tanpa koma& pembulatan


 


Terima kasih 



 

---------------------------------


Cheap Talk? Checkout Yahoo! Messenger's low PC-to-Phone call rates.


 


 
---------------------------------
Never Miss an Email
Stay connected with Yahoo! Mail on your mobile. Get started!

Kirim email ke