Dibutuhkan waktu lama untuk memulai dan menjalankan sistem aplikasi besar. Waktunya akan bervariasi sesuai dengan jumlah inisialisasi yang diperlukan dan kecepatan sistem pengguna. Oleh karena itu, jendela inisialisasi harus ditampilkan sebelum jendela utama ditampilkan tampilan aplikasi lebih menarik. Karena beberapa informasi dapat terus ditampilkan kepada pengguna saat program dimuat, dan efek visual yang indah dapat dihasilkan. Misalnya, VB dan Delphi menampilkan jendela splash di depan antarmuka utama saat memulai.
----1. Berikut cara sederhana menampilkan splash layar (slogan):
pilihaneksplisit
Subformulir Pribadi_beban()
'Tampilkan jendela utama
saya.tunjukkan
'Tampilkan jendela percikan
frmsplash.show
melakukan acara
'Lakukan inisialisasi aplikasi
inisialisasi
'Tutup jendela splash
membongkarpalsh
sub akhir
---- Kode prosedur ini harus ditempatkan di formulir startup aplikasi. Metode show pertama memungkinkan Windows untuk menampilkan form utama di layar, dan metode show berikutnya menampilkan layar flash, yaitu form yang Anda rancang bernama frmsplash. Setelah menggunakan metode show, gunakan fungsi Doevents untuk memastikan flashing Semua elemen bentuk layar segera digambar. Fungsi Inisialisasi melakukan tugas-tugas memakan waktu yang perlu dilakukan saat aplikasi dimulai, seperti memuat data dari file, memuat formulir ke dalam memori, dan sebagainya. Pada titik ini semuanya sudah siap.
----2. Templat formulir berkedip
----VisualBasic berisi banyak bentuk template, salah satunya adalah layar flash. Untuk menambahkan formulir Splashscreen ke proyek, pilih AddForm dari menu proyek. Pilih ikon SplashScreen pada tab Baru di kotak dialog AddForm dan klik Buka. Formulir SplashScreen ditambahkan ke proyek.
----Kode berikut memperlihatkan contoh cara mengkustomisasi Templat formulir SplashScreen:
pilihaneksplisit
subformulir_load() pribadi
frmsplash.lbllicenseto=app.legalmerek dagang
frmsplash.lblcompanyproduct=aplikasi.nama produk
frmsplash.lblplatform="window98"
frmsplash.lblcopyright=app.legalcopyright
frmsplash.lblcompany=aplikasi.nama perusahaan
frmsplash.lblwarning="Peringatan:program ini dilindungi"&_
"berdasarkan hukum hak cipta, jadi jangan menyalin"
frmsplash.show
melakukan acara
inisialisasi
bongkarfrmsplash
sub akhir
---- Perhatikan bahwa objek aplikasi digunakan di sini, yang dapat mengakses informasi tentang aplikasi Anda;
----Kode modul kode template form splashscreen adalah sebagai berikut:
PrivateSubForm_keypress(keyasciiasinteger)
bongkar saya
Sub akhir
Subformulir_pribadi()
lblversion.caption="versi"&aplikasi.major&".
"app.minor"."app.revisi
lblnama produk.caption=aplikasi.judul
sub akhir
subframe pribadi1_klik()
bongkar saya
Sub Akhir->