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!