Disable Close Bawaan, Modifikasi Tombol Keluar Sendiri

Perhatikan gambar format gif dibawah..!! Fungsi tombol close bawaan tidak dapat difungsikan, namun untuk keluar dari aplikasi pengguna aplikasi diarahkan untuk mengklik tombol keluar yang khusus dibuat. Perintah pada Tombol Keluar juga telah di tambahkan untuk menyimpan perubahan data terakhir saat kita menggunakan aplikasi.

Membuat Tombol dengan perintah keluar dari aplikasi sangat mudah..!! simak baik-baik dan ikuti langkah-langkah yang saya sajikan dalam postingan ini. Perlu sangat diperhatikan bahwa kita masih mengunakan file yang terdapat pada posting "Tombol Simpan VBA Excel"

Admin sangat menyarankan bagi yang sedang mempelajari kode Vba Excel agar membuat file contoh penerapan kode. Dengan membuat file contoh penerapan kode akan mempercepat memahami penggunaan dan fungsi dari kode yang diterapkan

Langkah-langkah Disable Close Bawaan, Modifikasi Tombol Keluar Sendiri :

Buka File Aplikasi Data dan masuk ke Visual Basic
Untuk Disable Close Bawaan UserForm, klik kanan pada UserForm pilih View Code dan masukkan kode dibawah ini, dan perhatikan gambar dibawah kode

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then
Cancel = True
MsgBox "Klik Tombol Keluar..!!!", 16, "Aplikasi Data"
End If
End Sub

Pada UserForm tambahkan 1 buah label dengan Name "LbKeluar" dan Caption "Keluar", pada bagian Image load gambar yang cocok. Bila tidak ada stock Download Icon Turn Off. Perhatikan saja gambar dibawah yeah..!!!