Anda sedang offline saat ini, menunggu internet Anda untuk menyambung kembali

Cara menggunakan Visual Basic untuk mengisi kotak teks pada laporan dalam Microsoft Access

Support for Office 2003 has ended

Microsoft ended support for Office 2003 on April 8, 2014. This change has affected your software updates and security options. Learn what this means for you and how to stay protected.

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:291533
Artikel ini telah diarsipkan. Artikel ditawarkan dalam bentuk "apa adanya" dan tidak akan dapat diperbarui lagi.
Artikel ini berlaku untuk Microsoft Access database (.mdb) dan proyek Microsoft Access (.adp).

Moderat: Memerlukan dasar makro, coding, dan interoperabilitas keterampilan.

Untuk versi Microsoft Access 2000 artikel ini, lihat 210136.
Untuk versi Microsoft Access 97 artikel ini, lihat 143280.
RINGKASAN
Artikel ini menunjukkan kepada Anda bagaimana untuk membuat sampel Visual Basic untuk aplikasifungsi yang populates (atau memenuhi) kontrol pada laporan yang didasarkan pada meja atau permintaan ketika Anda melihat atau mencetak laporan. Contoh fungsimengisi kotak teks baru dibuat pada sebuah laporan dengan nilai dariQuantityPerUnit lapangan di meja produk database contohLaporan ini didasarkan pada permintaan saat ini daftar produk Northwind.mdb.Northwind database.

CATATAN: Artikel ini menjelaskan teknik yang ditunjukkan dalam sampelfile, RptSmp00.mdb. Untuk informasi tambahan tentang cara mendapatkan file sampel ini, klik nomor artikel di bawah ini untuk melihat artikel di dalam Basis Pengetahuan Microsoft:
231851ACC2000: Microsoft Access 2000 contoh laporan tersedia di Pusat Download
INFORMASI LEBIH LANJUT
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. Contoh berikut panggilan Visual Basic untuk aplikasi fungsi dalam OnFormat properti laporan untuk mengisi kontrol terikat pada laporan. Sebagai alternatif, Anda dapat memanggil fungsi dari ControlSource properti kontrol terikat. Untuk membuat contoh, ikuti langkah berikut.

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.

  1. Buka database contoh Northwind.mdb.
  2. Gunakan Wisaya laporan untuk membuat sebuah laporan baru yang didasarkan pada permintaan saat ini daftar produk dengan pilihan berikut:
    • Termasuk kedua bidang.
    • Menambahkan tingkat pengelompokan tidak.
    • Urut dengan ProductName.
    • Gunakan pengaturan tata letak standar.
    • Pilih gaya perusahaan.
    • Nama laporan mengisi laporan.

  3. Buka laporan mengisi laporan dalam Design view.
  4. Menambahkan kotak teks berikut ke bagian rinci laporan mengisi laporan:
       Text box   ----------------------------   Name: Quantity   ControlSource: <leave empty>					
  5. Ketik kode contoh berikut dalam modul baru atau yang ada.CATATAN: Kode contoh dalam artikel ini menggunakan Microsoft Data akses objek. Untuk kode ini untuk menjalankan dengan benar, Anda harus referensi perpustakaan objek Microsoft DAO 3,6. Untuk melakukannya, klik Referensi pada Alat menu di Editor Visual Basic, dan memastikan bahwa Perpustakaan objek Microsoft DAO 3,6 kotak centang dipilih.

    Function FillRep()Dim rs As DAO.RecordsetDim db As DAO.DATABASESet db = CurrentDb()Set rs = db.OpenRecordset("Products", dbOpenDynaset)rs.MoveFirstrs.FindFirst "[ProductID]=" & Reports![Fill Report]![ProductID]' Use this line if the function is called from report' detail section's OnFormat property event procedure.Reports![Fill Report]![Quantity] = rs![QuantityPerUnit]' -or- use this line if the function is called from the' ControlSource property of the unbound control.FillRep = rs![QuantityPerUnit]End Function					
  6. Menetapkan OnFormat properti bagian rinci laporan sebagai berikut:
    =FillRep()
    CATATAN: Anda juga dapat memanggil fungsi FillRep() dari ControlSource properti teks kuantitas terikat kotak sebagai berikut:
       Name: Quantity   ControlSource: =FillRep()						
    Jika Anda menggunakan metode ini, menambahkan komentar (') di depan baris kodeLangkah 5:
    Reports![Fill Report]![Quantity] = rs![QuantityPerUnit]					
  7. Pratinjau laporan. Perhatikan bahwa kotak teks kuantitas pada laporandiisi oleh Visual Basic untuk aplikasi fungsi.
OfficeKBHowTo ACC2002 ACC2003
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: 291533 - Tinjauan Terakhir: 12/06/2015 01:12:54 - Revisi: 2.0

Microsoft Office Access 2003, Microsoft Access 2002 Standard Edition

  • kbnosurvey kbarchive kbreport kbprogramming kbhowto kbmt KB291533 KbMtid
Tanggapan