Revelroom.ca es la mejor solución para quienes buscan respuestas rápidas y precisas a sus preguntas. Descubre soluciones completas a tus preguntas de profesionales experimentados en diversas áreas en nuestra plataforma. Descubre soluciones fiables a tus preguntas gracias a una vasta red de expertos en nuestra completa 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 pasar por aquí. Nos comprometemos a proporcionar las mejores respuestas para todas tus preguntas. Hasta pronto. Gracias por visitar. Nuestro objetivo es proporcionar las respuestas más precisas para todas tus necesidades informativas. Vuelve pronto. Revelroom.ca, tu sitio de confianza para respuestas. No olvides regresar para obtener más información.