Cara Membuat Password Karakter Sensitif Untuk Form Login

Tutorial ini merupakan lanjutan dari tutorial sebelumnya tentang cara membuat Form Login sederhana. dalam tutorial tersebut - pengguna diharuskan memasukkan sebuah kata kunci (password) agar bisa masuk ke dalam aplikasi utama, permasalahannya adalah : kata kunci tersebut tidak bersifat sensitif, artinya penulisan kata kunci mengabaikan format karakter. Ambil contoh, password yang digunakan untuk login adalah "admin" (format karakter huruf kecil) sedangkan pengguna menuliskan kata tersebut menggunakan huruf kapital sehingga menjadi "ADMIN". 

Dengan mengabaikan sensitifitas sebuah karakter, dua kata tersebut adalah sama - entah menggunakan format tulisan huruf kecil, kapital, atau gabungan antara keduanya. Padahal, pada umumnya penulisan kata sandi atau password selalu bersifat sensitif hal ini diperuntukkan demi menjaga keamanan data.

Sebuah kelemahan kecil yang tentunya akan berakibat sangat fatal yang terdapat pada tutorial terdahulu kini dapat Anda perbaiki melalui panduan berikut ini :

Menentukan password dalam sebuah sel
Langkah inilah yang tidak ada dalam tutorial sebelumnya. Ya, langkah ini merupakan kunci yang nantinya password tersebut bersifat sensitif - sehingga penulisan karakternya harus sama persis dengan apa yang terdapat dalam sebuah sel.

Aktifkan Sheets1 (atau terserah) kemudian ketikkan sebuah kata atau kalimat di dalam sel A2, yang nantinya akan difungsikan sebagai password. Contoh, ketikkan kata "admin" - tanpa tanda petik
selanjutnya letakkan fungsi berikut di sel C2

=EXACT(A2,B2)

artinya, isi sel B2 harus sesuai dengan sel A2 - dan jika tidak maka fungsi ini akan menghasilkan nilai FALSE.

Kombinasi Fungsi dengan Macro VBA
Sebelumnya siapkan sebuah desain untuk UserForm - atau Anda bisa juga menggunakan desain seperti tutorial sebelumnya. Langkah selanjutnya adalah memasukkan kode untuk Kotak Password (TextBox1) dan Tombol Login (CommandButton1) seperti berikut :

Private Sub TextBox1_Change()
Range("B2") = TextBox1
End Sub

---

Private Sub CommandButton1_Click()
If Range("C2") = False Thn
     MsgBox "Password yang Anda masukkan salah"
     Else
     UserForm1.Hide
     MsgBox "Selamat Datang..."
End If
End Sub

Skema Kerja Login
Ketika pengguna memasukkan sebuah password di kotak TextBox1 yang secara otomatis juga akan tertulis di sel B2, kemudian fungsi =EXACT akan membaca kesamaan antara sel B2 dengan sel A2.
Jika dua sel tersebut berisi data yang sama persis maka akan menghasilkan nilai TRUE, dan sebaliknya jika keduanya terdapat perbedaan maka akan menghasilkan nilai FALSE.

Sementara itu tombol Login membaca informasi dari fungsi EXACT, artinya pengguna akan berhasil login ketika sel C2 bernilai TRUE dan ketika sel C2 bernilai FALSE akan menampilkan sebuah pesan bahwa password yang dimasukkan salah.

Anda juga dapat mengkombinasikan tutorial ini dengan tutorial-tutorial lainnya yang dapat Anda pelajari untuk memaksimalkan Form Login anda