Aunque tienes tambièn para realizar de la siguiente manera
En cada caja de text colocas
Código:
Private Sub Text1_Change()
If Not (text1.text="") And (text2.text="") And (text3.text="") then
Command1.enabled = true
else
Command1.enabled = false
end if
End sub