Mas Rahmat,
Dulu saya pernah mengatasi masalah yang kira-kira seperti ini, barangkali
membantu:
1. Komputer yang mas pakai sepertinya di set untuk local area yang
menggunakan koma (contoh: Indonesia) untuk pembatas desimal, sehingga setelah
komputer mandapat hasil "pengurangan" 1.5 ditampilkan menjadi 1,5.
Solusi:
1. Set komputer mas pada area yang menggunakan "point" sebagai pembatas
desimal (mis: United State)
2. Solusi ini sedikit rumit karena perlu program.
dim dHasil As Double, sHasil As String
dHasil = Val(Txt1.Text) - Val(Txt2.Text)
sHasil = Str(dHasil)
sHasil = Replace(sHasil,",",".")
txtHasil.Text = sHasil
Mungkin dari yang lain ada metode yang lebih singkat
NARIF RAHMAT SANTOSA SANTOSA <[EMAIL PROTECTED]> wrote:
Master VB yang terhormat saya mau Tanya neh :
Bagai caranya mengurangi bilangan pecahan dan hasil yang di tampilkan bukan
koma melainkan titik
Contoh :
Private Sub Command1_Click()
txthasil.Text = Val(txt1.Text) - Val(txt2.Text)
End Sub
Jika di txt1.text dimasukan angka 2.5 dan di txt2.text dimasukan angka 1
Maka jika di kurangi hasilnya akan 1,5
Yang saya inginkan adalah 1.5 bukan 1,5
Terimakasih atas bantuannya.
---------------------------------
Bergabunglah dengan orang-orang yang berwawasan, di bidang Anda di Yahoo!
Answers
---------------------------------
You rock. That's why Blockbuster's offering you one month of Blockbuster Total
Access, No Cost.
