Hacer password

[crucifijo]

Hola amigos experots fijense que estoy haciendo un password muy sencillo pero tengo un prbolema para emezar

Tengo una etiqueta con el titulo password una caja de texto donde digito el password la caja del texto se llama text1.

Dos botones un de aceptar y el otro cancelar, el boton aceptar se llama Command1 y el boton cancelar se llama Command2, toda la programacion la hice en el boton aceptar y esto es lo que puse como programacion:

Private Sub Command1_Click()
If Text1.Text = 123 Then
Form2.Show
Form1.Hide
Else
MsgBox ("Clave incorrecta")
End If
End Sub

La duda es que tengo que cuando corre el programita si digito un numero diferente a 123 me manda el mensaje ("Clave incorrecta") y si lo digito bien me pasa a la otra forma, pero si dejo en blanco o no digito nada me manda un error y el debug.

Quisiera saber si ustedes me pueden decir como hacer para que cuando la caja de texto este en blanco o no se le digite nada me mande el mensaje ("Clave incorrecta") o de que otra forma lo puedo hacer se los agradeceria muchisimo si me hechan la mano.