Fungsi DoEvents

Penting: Artikel ini diterjemahkan oleh mesin, lihatlah notis penafian. Sila dapatkan versi Bahasa Inggeris artikel ini di sini sebagai rujukan anda

Nota: Fungsi, kaedah, objek atau sifat yang diperihalkan dalam topik ini dinyahdayakan jika Perkhidmatan Microsoft Jet ungkapan berjalan dalam mod kotak pasir yang menghalang penilaian ungkapan yang mungkin tidak selamat. Untuk maklumat lanjut tentang mod kotak pasir, Cari "mod kotak Pasir" dalam bantuan.

Hasil pelaksanaan agar sistem pengendalian boleh memproses peristiwa lain.

Sintaks

DoEvents ( )

Catatan

Fungsi DoEvents mengembalikan Integer yang mewakili bilangan membuka borang dalam versi kendiri bagi Microsoft Visual Basic, seperti Visual Basic, edisi profesional. DoEvents mengembalikan sifar dalam aplikasi lain.

DoEvents menghantar kawalan sistem pengendalian. Kawalan dikembalikan selepas sistem pengendalian yang telah selesai memproses peristiwa dalam baris gilir kerjanya dan semua kekunci dalam baris gilir SendKeys dihantar.

DoEvents adalah paling berguna untuk sesuatu yang ringkas seperti membenarkan pengguna untuk membatalkan proses selepas ia bermula, contohnya mencari fail. Untuk proses berjalan lama kepada pemproses lebih baik dicapai menggunakan pemasa yang atau perwakilan tugas untuk komponen ActiveX EXE. Dalam kes kedua, tugas boleh terus sepenuhnya berasingan daripada aplikasi anda dan sistem pengendalian membawa bertanggungjawab untuk merangkumi dan menghiris masa.

Bila-bila masa anda buat sementara waktu hasil untuk pemproses dalam prosedur peristiwa, pastikan prosedur adalah tidak dilaksanakan sekali lagi daripada bahagian lain kod anda sebelum panggilan pertama mengembalikan; ini mungkin menyebabkan hasil yang tidak dapat diramalkan. Selain itu, Jangan gunakan DoEvents jika aplikasi lain boleh mungkin berinteraksi dengan prosedur anda dalam cara yang luar jangkaan semasa masa yang anda telah menghasilkan kawalan.

Contoh

Nota: Contoh berikut menunjukkan penggunaan fungsi ini dalam Visual Basic for Applications (VBA) modul. Untuk maklumat lanjut tentang bekerja dengan VBA, pilih Rujukan pembangun dalam senarai juntai bawah di sebelah Cari dan memasukkan satu atau lebih istilah dalam kotak carian.

Contoh ini menggunakan fungsi DoEvents menyebabkan pelaksanaan kadar hasil untuk sistem pengendalian sekali setiap 1000 lelaran bagi gelung. DoEvents mengembalikan nombor membuka borang Visual Basic, tetapi hanya apabila aplikasi hos Visual Basic.

' Create a variable to hold number of 
' Visual Basic forms loaded and visible.
Dim I, OpenForms
For I = 1 To 150000 ' Start loop.
If I Mod 1000 = 0 Then ' If loop has repeated
' 1000 times.
OpenForms = DoEvents ' Yield to operating system.
End If
Next I ' Increment loop counter.

Nota: Notis Penafian Penterjemahan Mesin: Artikel ini telah diterjemah oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan penterjemahan mesin ini untuk membantu pengguna-pengguna yang tidak bertutur dalam Bahasa Inggeris supaya dapat menikmati kandungan mengenai produk, perkhidmatan dan teknologi Microsoft. Artikel ini mungkin mengandungi ralat perbendaharaan kata, sintaks atau tatabahasa kerana ia diterjemahkan oleh mesin.

Kembangkan kemahiran anda
Jelajahi latihan
Dapatkan ciri baru terlebih dahulu
Sertai Office Insiders

Adakah maklumat ini membantu?

Terima kasih atas maklum balas anda!

Terima kasih atas maklum balas anda! Nampaknya ia mungkin akan membantu untuk menyambungkan anda kepada salah seorang daripada ejen sokongan Office kami.

×