Fungsi Command

Berlaku Untuk
Access untuk Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Anda dapat menggunakan fungsi Command untuk mengembalikan bagian argumen dari baris perintah yang digunakan untuk meluncurkan Access.

Keterangan

Saat Access diluncurkan dari baris perintah, bagian mana pun dari baris perintah yang mengikuti opsi /cmd diteruskan ke program sebagai argumen baris perintah. Anda dapat menggunakan fungsi Command untuk mengembalikan argumen yang telah diteruskan.

Untuk mengubah argumen baris perintah setelah database dibuka:

  1. Pada menu File , klik Opsi Akses.
  2. Dalam kotak dialog Pengaturan Aplikasi , klik Tingkat lanjut.
  3. Masukkan argumen baru dalam kotak Argumen baris perintah .

Fungsi Command kini akan mengembalikan argumen baru yang telah Anda masukkan.

Ketika fungsi Command digunakan di mana saja selain dalam kode Visual Basic for Applications (VBA) dalam modul, Anda harus menyertakan tanda kurung kosong setelah fungsi. Misalnya, untuk menggunakan fungsi Command dalam kotak teks pada formulir, Anda harus mengatur properti ControlSource kotak teks ke ekspresi seperti berikut:

=Command()

Contoh

Catatan

Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.

Contoh berikut ini menunjukkan cara meluncurkan Access dengan argumen baris perintah lalu memperlihatkan cara mengembalikan nilai argumen ini menggunakan fungsi Perintah .

Untuk menguji contoh ini, klik tombol Start Windows dan klik Jalankan. Ketik kode berikut dalam kotak Jalankan pada satu baris. (Anda harus menutup bagian-bagian informasi baris perintah dalam tanda kutip).


"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"

Selanjutnya, buat modul baru dalam database sampel Northwind Traders dan tambahkan Subprosedur berikut:


Public Sub CheckCommandLine()
    ' Check the value returned by Command function and display
    ' the appropriate form.
    If Command = "Orders" Then
        DoCmd.OpenForm "Orders"
    ElseIf Command = "Employees" Then
        DoCmd.OpenForm "Employees"
    Else
        Exit Sub
    End If
End Sub

Saat Anda memanggil prosedur ini, Access akan membuka formulir Pesanan. Anda dapat membuat makro AutoExec untuk memanggil prosedur ini secara otomatis saat database dibuka.