Salam VB,
Pake componnent one akan lebih baik tanpa repot mikirin codingnya
tp kalo mo coba ini jg boleh mas
Public Function RealNumber (myString as String)
Dim ResultString As String
Dim i As Integer
For i = 0 To myString.Length - 1
If IsNumeric(myString.Chars(i)) = True OrElse myString.Chars(i) =
"." OrElse myString.Chars(i) = "," Then
ResultString &= myString.Chars(i)
End If
Next
MessageBox.Show(ResultString)
RealNumber = ResultString
End Function
Semoga membantu...
________________________________
GENERASI COMPUTER
Berbagi Ilmu Visual Basic Bagi Pemula
http://www.generasicomputer.com
Hp. 08126514562
________________________________
________________________________
From: Anez Story <[email protected]>
To: [email protected]
Sent: Sun, May 16, 2010 9:18:53 PM
Subject: Re: [programmer-vb] Format Desimal
walah..
ya ntu tinggal di ubah aja mas settingan koma nya.
ga perlu di ubah regional settingnya.
--- On Wed, 5/12/10, arief budiman <arbu...@yahoo. com> wrote:
>From: arief budiman <arbu...@yahoo. com>
>Subject: [programmer- vb] Format Desimal
>To: programmer-vb@ yahoogroups. com
>Date: Wednesday, May 12, 2010, 3:38 AM
>
>
>>
>
>
>
> >
>
>
>>
>
>Salam VB,
>
>saya lagi bingung gimana ngakali format desimal? soalnya pas "regional
>setting" dikomputer saya pake "english" hasilnya sesuai, tapi pas regional
>settingnya dirubah ke indonesia hasilnya jadi tidak sesuai khususnya untuk
>operasi pembagian. sebagai catatan textinputnya untuk koma saya menggunakan
>tanda titik (.).
>
>mohon pencerahannya.
>
>thanks.
>Arief
>
>
