Command1_Click () Dim contraseña as string contraseña = "PASSWORD" If Text1.Text = contraseña Then Msgbox "Contraseña correcta" Else Msgbox "Contraseña incorrecta" Text1.Text = "" End If End Sub
cuando verificas si la contraseña es valida o no, despues de todo.. pones text1.text = "" y de esa forma te asigna vacio al contenido del text.. saludos