ACC2000: Bulat atau memotong nilai mata uang dimaksudkan jumlah desimal

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 210564 - Melihat produk di mana artikel ini berlaku.
Moderat: Memerlukan dasar makro, coding, dan interoperabilitas keterampilan.

Artikel ini berlaku untuk Microsoft Access database (.mdb) dan proyek Microsoft Access (.adp).

Perbesar semua | Perkecil semua

Pada Halaman ini

RINGKASAN

The Format properti kontrol dapat putaran lapangan nomor atau mata uang dengan jumlah desimal yang Anda inginkan. Namun, ini tidak mengubah data yang mendasarinya, yang mungkin berisi angka tambahan yang kontrol tidak menampilkan. Jika Anda menambahkan nilai-nilai dalam kontrol ini, jumlah didasarkan pada nilai-nilai yang sebenarnya dan bukan pada nilai-nilai yang ditampilkan. Perilaku ini mungkin membuat total tampaknya tidak akurat.

Artikel ini menunjukkan cara membuat dua user-defined functions untuk memotong data untuk dua angka desimal sehingga ditampilkan dan nilai telah diformat dan data numerik atau mata uang yang sebenarnya adalah sama. Itu juga menunjukkan kepada Anda bagaimana menggunakan built-in Round) fungsi untuk mengumpulkan data yang dimaksudkan jumlah desimal.

INFORMASI LEBIH LANJUT

Jika data Anda memiliki lebih dari dua digit angka setelah titik desimal, Anda dapat mengumpulkan hasil untuk dua angka desimal atau memotong nomor setelah dua angka desimal tanpa pembulatan. Untuk memformat data sehingga sebenarnya nilai dan nilai ditampilkan memiliki dua angka desimal (khususnya untuk mata uang), Anda dapat menggunakan salah satu fungsi-fungsi berikut di Setelah Update properti dari bentuk kontrol objek atau dalam ekspresi dan kontrol dihitung pada forms and reports.

Microsoft menyediakan contoh pemrograman hanya sebagai ilustrasi, tanpa jaminan apa pun baik tersurat maupun tersirat. Termasuk, namun tidak terbatas pada, jaminan tersirat mengenai kelayakan untuk diperdagangkan atau kesesuaian untuk keperluan tertentu. Artikel ini mengasumsikan bahwa Anda telah terbiasa dengan bahasa pemrograman yang ditunjukkan dan dengan alat yang digunakan untuk membuat dan mendebug prosedur. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu, namun mereka tidak akan memodifikasi contoh untuk memberikan fungsionalitas tambahan atau menyusun prosedur untuk memenuhi persyaratan khusus Anda.
HATI-HATI: Jika Anda mengikuti langkah-langkah dalam contoh ini, Anda mengubah database contoh Northwind.mdb. Anda dapat membuat cadangan berkas Northwind.mdb dan ikuti petunjuk pada salinan database.

Metode 1: Fungsi untuk digunakan dalam properti Update setelah bentuk kontrol

Truncating nilai untuk dua angka desimal

Untuk memotong nomor dua angka desimal selama entri data, ikuti langkah berikut:
  1. Mulai Microsoft Access dan membuka database contoh Northwind.mdb atau contoh proyek NorthwindCS.adp.
  2. Membuat modul baru dan ketik fungsi-fungsi berikut:
    '******************************************************
    ' Declarations section of the module
    '******************************************************
    
    Option Explicit
    Const Factor = 100
    
    '=====================================================
    ' TruncAU is designed to be added to the
    ' AfterUpdate property on a form control.
    '=====================================================
    
    Function TruncAU(X As Control)
       X = Int(X * Factor) / Factor
    End Function
    					
  3. Pada Berkas menu, klik Menutup dan mengembalikan ke Microsoft Access.
  4. Membuka formulir produk dalam Design view, dan kemudian menambahkan fungsi TruncAU() Visual Basic untuk AfterUpdate properti medan hargaSatuan:
    AfterUpdate: =TruncAU([UnitPrice])

Pembulatan nilai untuk dua angka desimal

Untuk mengumpulkan nomor dua angka desimal selama entri data, ikuti langkah berikut:
  1. Mulai Microsoft Access dan membuka database contoh Northwind.mdb atau contoh proyek NorthwindCS.adp.
  2. Membuka formulir produk dalam Design view, dan menambahkan Visual Basic Round) fungsi AfterUpdate properti HargaSatuan bidang:
    AfterUpdate: =Round([UnitPrice],2)
    Jika Anda secara tidak sengaja mengetik $23.055 bukannya $23.05, fungsi TruncAu() menangkap kesalahan dan perubahan nilai $23.05. Jika Anda menggunakan Round) fungsi sebaliknya, perubahan fungsi nilai ke $23.06. Jika Anda menggunakan fungsi tidak, nilai ditampilkan sebagai $23.06, tetapi nilai masuk, $23.055, digunakan dalam perhitungan apapun.

Metode 2: Fungsi untuk digunakan dalam ekspresi dan kontrol dihitung pada Forms and Reports

Untuk memotong jumlah untuk dua angka desimal di footer kelompok laporan, ikuti langkah berikut:
  1. Mulai Microsoft Access dan membuka database contoh Northwind.mdb atau contoh proyek NorthwindCS.adp.
  2. Membuat modul baru dan ketik fungsi-fungsi berikut:
    '******************************************************
    ' Declarations section of the module
    '******************************************************
    
    Option Explicit
    Const Factor = 100
    '=====================================================
    ' TruncCC is designed to be used in
    ' expressions and calculated controls on forms and reports.
    '=====================================================
    
    Function TruncCC(X)
       TruncCC = Int (X * Factor) / Factor
    End Function
    					
  3. Pada Berkas menu, klik Menutup dan mengembalikan ke Microsoft Access.
  4. Terbuka Ringkasan dari penjualan tahun melaporkan dalam Design view, dan kemudian mengubah kotak dua teks berikut ini dalam laporan kelompok footer dengan properti berikut:
    Mengendalikan nama: QuarterSales
    ControlSource: =Sum(TruncCC([SubTotal]))

    Mengendalikan nama: YearTotal
    ControlSource: =Sum(TruncCC([SubTotal]))
    Jika Anda menggunakan Round), laporan jumlah nilai-nilai yang ditampilkan dalam laporan, meskipun nilai yang sebenarnya mungkin mengandung tersembunyi digit.
CATATAN: Untuk mengubah jumlah desimal yang menggunakan fungsi, Buka modul yang mengandung fungsi pemotongan dan mengubah nilai konstanta global Faktor sebagai berikut:
10 = 1 desimal tempat
100 = 2 desimal tempat
1000 = 3 desimal, dan sebagainya

Keterbatasan

Fungsi ditetapkan pengguna hanya dapat digunakan dengan mata uang data. Jika digunakan dengan ganda atau satu nomor, Anda masih dapat menerima kesalahan pembulatan kecil. Alasan untuk ini adalah bahwa Single dan Double angka floating point. Mereka tidak dapat menyimpan biner persis pecahan desimal. Oleh karena itu, selalu ada beberapa error. Namun, nilai mata uang yang skala bilangan bulat dan dapat menyimpan tepat biner dari pecahan untuk empat angka desimal.
Note This is a "FAST PUBLISH" article created directly from within the Microsoft support organization. The information contained herein is provided as-is in response to emerging issues. As a result of the speed in making it available, the materials may include typographical errors and may be revised at any time without notice. See Terms of Use for other considerations.

Properti

ID Artikel: 210564 - Kajian Terakhir: 19 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Access 2000 Standard Edition
Kata kunci: 
kbhowto kbinfo kbprogramming kbusage kbmt KB210564 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:210564

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com