Dengan menggunakan fungsi LABEL, TextBox dan CommandButton, sila design frame anda ikut kreativiti masing-masing

Klik Kanan dekat UserFrm1 > View code

Private Sub CommandButton1_Click()
Dim Username, password As String
Username = TextBox1.Text
password = TextBox2.Text
If Username = "admin" And password = "admin" Then
MsgBox "You entered the CORRECT info", vbInformation
Unload Me
Else
MsgBox "You entered the WRONG info", vbCritical
ActiveWorkbook.Close False
End If
End Sub

Copy and paste code berikut bermula "Dim Username" sehingga "End If"

Kemudian Klik Kanan dekat ThisWorkbook > View code

Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

Copy and Paste semua coding diatas

P/S anda boleh tukar username dan password pada coding pertama tadi "admin" (tukar yang dalam" " sahaja)

Kita cuba run excel kita tadi ye

Bila kita double klik fail excel kita, automatikkeluar form ni

masukkan password tadi....sekiranya betul, dia akan buka fail excel kita...Sekiranya silap, automatik close fail excel

Selamat Mencuba dan kita jumpa di lain hari....Assalamualaikum

Assalamualaikum dan selmat bercuti hujung minggu..agak lama saya tak kongsi cerita dalam ni...hari ni saya nak kongsi tentang kombinasi warna...kombinasi warna atau gradient atau apa sahaja istilah memainkan peranan dalam menghasilkan sesuatu karya..kadang2 kita dok penin nak guna warna apa..nak matching dengan warna apa...macam orang perempuan pilih kain nak buat baju, dia akan pilih tudung sekali yang matching warna..

Ada 1 laman web yang menyediakana panduan untuk kombinasi warna..kita boleh ambik idea dari situ dan pilih warna yang sesuai untuk buat backdrop, presentation ppt dan sebagainya.

contoh