kenapa gak 
  hasil = nilai - int(nilai)

contohnya 
  = 4.0999888809 - int(4.0999888809)
  = 4.0999888809 - 4
  = 0.0999888809




--- Darsana <[EMAIL PROTECTED]> wrote:

> kalo mau yg tradisional :
> trim(str)
> ambil panjang seluruhnya
> ambil posisi koma
> angka sebelum koma = left(str,posisi-1)
> angka setelah koma = right(str,panjang-posisi)
> 
> salah ya ??? blom nyoba, cuman raba2
> 
> 
> 
>   ----- Original Message ----- 
>   From: MEDAN SKD 
>   To: [email protected] 
>   Sent: Sunday, December 03, 2006 8:50 PM
>   Subject: Re: [Programmer-VB] Ambil nilai
> dibelakang koma
> 
> 
> 
>   Mas Ageng,
>   Maksud saya sebenarnya hasilnya begini:
> 
>             Nilai Sebelumnya                      
> Bilangan bulat           pecahannya
>                4.0999888809                         
>   4                            0.0999888809 
>              12.775999997                           
> 12                            0.775999997
>                1.412667                             
>      1                            0.412667
> 
> 
> 
>     ----- Original Message ----- 
>     From: ageng setia 
>     To: [email protected] 
>     Sent: Monday, December 04, 2006 11:04 AM
>     Subject: Re: [Programmer-VB] Ambil nilai
> dibelakang koma
> 
> 
> 
>     Hallo Pa Khabar Semuanya
> 
>     Hallo sorry saya salah ketik code ^_^. Harusnya:
>     Dim i as variant
>     i = split(object, ",")
>     msgbox i(1)
> 
>     Coba kamu pelajari file attach yang aku kirim
> ya.
> 
>     Semoga membantu and Sukses untuk Kita Semua
> 
>     Best Regards
>     ag3ng
> 
> 
>     ----- Original Message ----
>     From: MEDAN SKD <[EMAIL PROTECTED]>
>     To: [email protected]
>     Sent: Monday, December 4, 2006 10:37:30 AM
>     Subject: Re: [Programmer-VB] Ambil nilai
> dibelakang koma
> 
> 
> 
>     Mas Ageng
>     Saya udah coba pake ini:
> 
>     Private Sub Form_Load()
>     Dim I As Variant
>     Dim X As Double
> 
>     X = 678.99912121
>     I = Split(X, ",")
>     MsgBox I
>     End Sub
> 
>     Muncul error type mismacth
>     Mohon bantuannya
> 
>       ----- Original Message ----- 
>       From: ageng setia 
>       To: Programmer-VB@ yahoogroups. com 
>       Sent: Monday, December 04, 2006 10:07 AM
>       Subject: Re: [Programmer- VB] Ambil nilai
> dibelakang koma
> 
> 
> 
>       Hallo Semua pa khabar
> 
>       Hallo coba kamu pakai script ini deh:
> 
>       Dim i as variant
>       i = split(object, ",")
>       msgbox split(1)
> 
>       Semoga membantu dan sukses untuk kita semua
> 
>       Best Regards
>       ag3ng
> 
> 
>       ----- Original Message ----
>       From: Sukanda Djaya Medan <[EMAIL PROTECTED]
> co.id>
>       To: Programmer-VB@ yahoogroups. com
>       Sent: Monday, December 4, 2006 9:07:45 AM
>       Subject: [Programmer- VB] Ambil nilai
> dibelakang koma
> 
> 
> 
>       Rekan 
> 
>       Misalnya saya mempunyai data nilai:
> 
>            234,888809
>            123,775
>         1.412,667
>       23.888,91912
> 
> 
>       bagaimana cara mengambil nilai yg ada
> dibelakang koma?
> 
>       tq
>       r12al
> 
> 
> 
> 
>
--------------------------------------------------------------------------
>       Everyone is raving about the all-new Yahoo!
> Mail beta. 
> 
> 
> 
>       Internal Virus Database is out-of-date.
>       Checked by AVG Free Edition.
>       Version: 7.1.375 / Virus Database: 268.1.2/274
> - Release Date: 3/3/2006
> 
> 
> 
> 
> 
>
----------------------------------------------------------------------------
>     Cheap Talk? Check out Yahoo! Messenger's low
> PC-to-Phone call rates. 
> 
> 
> 
>
----------------------------------------------------------------------------
> 
> 
>     Internal Virus Database is out-of-date.
>     Checked by AVG Free Edition.
>     Version: 7.1.375 / Virus Database: 268.1.2/274 -
> Release Date: 3/3/2006
> 
> 
>    



 
____________________________________________________________________________________
Want to start your own business?
Learn how on Yahoo! Small Business.
http://smallbusiness.yahoo.com/r-index

Kirim email ke