Coba gunakan ini untuk bilangan pecahan:
Replace(Nz(Number), Chr(44), Chr(46), 1, 1, 1)
misal :
sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) "_ & "VALUES ('" & kode_barang & "','" & nama_barang & "','" & Replace(Nz(qty), Chr(44), Chr(46), 1, 1, 1) & "','" & Replace(Nz(harga), Chr(44), Chr(46), 1, 1, 1) & "')"
Salam,
Syarif
Dari: Tri Widodo <triwidodo78@gmail.com>
Kepada: belajar-access@yahoogroups.com
Dikirim: Kamis, 26 September 2013 19:36
Judul: Re: [belajar-access] RE: Input data pecahan
Maaf nih belum bisa juga dengan kode ini, sudah dicoba:
sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) "_ & "VALUES ('" & kode_barang & "','" & nama_barang & "','" & format(qty,"#.#") & "','" & format(harga,"#.#") & "')"
sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) "_ & "VALUES ('" & kode_barang & "','" & nama_barang & "','" & format(qty,"#.#") & "','" & format(harga,"#.#") & "')"
Tapi, kalau format textbox qty saya kosongkan (jadi tipenya string, rata kiri) justru bisa. Tapi ya lucu ya kalau data numeric rata kiri, terus tanda koma pakai titik.
On Sep 26, 2013 5:31 PM, "aksan kurdin" <aksan.kurdin@gmail.com> wrote:
seting dengan indonesia ya ?
salah satunya bisa pake fungsi format:
sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) "_
& "VALUES ('" & kode_barang & "','" & nama_barang & "','" & format(qty,"#.#") & "','" & format(harga,"#.#") & "')"
On 9/26/2013 5:16 PM, Tri Widodo wrote:
> sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga)
> VALUES ('" & kode_barang & "','" & nama_barang & "','" & qty & "','" &
> harga & "')"
__._,_.___
Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (10) |
SPAM IS PROHIBITED
.
__,_._,___
Tidak ada komentar:
Posting Komentar