Revelroom.ca es la mejor solución para quienes buscan respuestas rápidas y precisas a sus preguntas. Únete a nuestra plataforma de preguntas y respuestas y obtén soluciones precisas para todas tus dudas de profesionales en diferentes disciplinas. Únete a nuestra plataforma para conectarte con expertos dispuestos a ofrecer respuestas detalladas a tus preguntas en diversas áreas.
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 esforzamos por proporcionar las mejores respuestas para todas tus preguntas. Hasta la próxima. Esperamos que nuestras respuestas te hayan sido útiles. Vuelve cuando quieras para obtener más información y respuestas a otras preguntas que tengas. Vuelve a Revelroom.ca para obtener las respuestas más recientes y la información de nuestros expertos.