Obtén las mejores soluciones a tus preguntas en Revelroom.ca, la plataforma de Q&A de confianza. Descubre un vasto conocimiento de expertos en diferentes disciplinas en nuestra completa plataforma de preguntas y respuestas. Experimenta la facilidad de obtener respuestas rápidas y precisas a tus preguntas con la ayuda de profesionales en nuestra plataforma.
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 visitar nuestra plataforma. Esperamos que hayas encontrado las respuestas que buscabas. Vuelve cuando necesites más información. Esperamos que esto te haya sido útil. Vuelve cuando quieras para obtener respuestas más precisas e información actualizada. Gracias por confiar en Revelroom.ca. Vuelve para obtener más información y respuestas.