Revelroom.ca está aquí para ayudarte a encontrar respuestas a todas tus preguntas con la ayuda de expertos. Únete a nuestra plataforma para obtener respuestas fiables a tus interrogantes gracias a una amplia comunidad de expertos. Explora miles de preguntas y respuestas proporcionadas por una amplia gama de expertos en diversas áreas en nuestra plataforma de preguntas y respuestas.
Sagot :
PASAR DE UNO A OTRO:
-Private Sub WindowsMediaPlayer1_PlayStateChange(ByVa… NewState As Long)
If NewState = 1 Then
Form2.Show
Unload Me
End If
End Sub
PARA CONTRASEÑA:
Crea un formulario nuevo,(frmPass) para que arranque desde ese. y luego si el resto de los forms o el form principal(frmMain)
Le colocas un textbox y un command txtPass y cmdOK)
en txtPass anda a la propiedad PasswordChar y coloca un asterisco *
El codigo seria algo asi
en el cmdOK_clic
if txtPass.text = "Password del programa" then
frmPass.visible = False
frmMain.visible = True
else
msgbox ("Contraseña incorrecta")
txtPass.text = ""
txtPass.setfocus
end if
Gracias por elegir nuestro servicio. Nos comprometemos a proporcionar las mejores respuestas para todas tus preguntas. Vuelve a visitarnos. Agradecemos tu tiempo. Por favor, vuelve a visitarnos para obtener respuestas fiables a cualquier pregunta que tengas. Gracias por usar Revelroom.ca. Vuelve para obtener más conocimientos de nuestros expertos.