Validasi Data di TextBox

DESKRIPSI
Disini saya akan menjelaskan bagaimana cara penggunaan validasi. validasi maksudnya mengesahkan atau mengumumkan. jadi jika textbox tidak berisi "abc" maka tombol (command1) dapat diklik atau berpindah fokus.
PERSIAPAN			PROPERTIES
NO	CONTROL	ITEM	NAME	VALUE	KETERANGAN
1.	TextBox	1	Text	""	kosongkan
2.	CommandButton	1	Caption	Validate

Masukkan souce ini ke dalam Form :Private Sub Text1_Validate(Cancel As Boolean) Cancel = Text1.Text <> "abc" End Sub