Red de conocimiento informático - Material del sitio web - Cambiar contraseñas en programación VB.

Cambiar contraseñas en programación VB.

Private Sub Command1_Click()

Si Text1.Text lt;gt; GetSetting(App.Title, "Configuración", "Contraseña", "") Luego MsgBox "Contraseña incorrecta. Vuelva a ingresar": Salir Sub

Si Text2.Text lt;gt; Text3.Text Then MsgBox "Las dos entradas no son iguales, vuelva a ingresar": Salga de Sub

SaveSetting App.Text2. Envíe un mensaje de texto a

MsgBox "¡Cambio exitoso!"

Descargar aplicación.

Descargarme

End Sub