Commandbuttonu aktif ve pasif yapmak

[memduh]

Arkadaşlar Textbox1 Boş olduğu zaman Commandbutton1 in pasif yani çalışmaması, textbox1 dolu olduğu zaman commandbuttonun activ olması (çalışmasını yapan kod varmı? saygılar.

 

[osmantelci]

Private Sub TextBox1_Change()
If TextBox1 = Empty Then CommandButton1.Enabled = 0 Else CommandButton1.Enabled = 1
End Sub