Duda

[CARRY-ON]

Es posible colocarle contraseña a un ejecutable cosa que cuando se ejecute te pida contraseña y si es la correcta se ejecuta y sino no se ejecuta 

ehh si es posible eso como seria?

[Ironhorse]

Tendrias que crear un formulario, establecerlo como inicial, que te pida la clave, la controle y si es correcta muestre el formulario principal del programa y si no, que salga.

[skapunky]

Si es posible..Aqui tienes la idea:

Código [Seleccionar] Expandir

Private Sub Form_Load()
dim pass as string
If Pass = " Password_que_quieras" then
  nuevoform.show
then
  end
End Sub

Por cierto, el text donde los usuarios pongan el pass le puedes poner un "*" en la propiedad passwordchar o algo asi para que escriba asteriscos en el password y quede mas profesional.

SaLUDOS.

[CARRY-ON]

Si es posible..Aqui tienes la idea:

Código [Seleccionar] Expandir

Private Sub Form_Load()
dim pass as string
If Pass = " Password_que_quieras" then
  nuevoform.show
then
  end
End Sub

Por cierto, el text donde los usuarios pongan el pass le puedes poner un "*" en la propiedad passwordchar o algo asi para que escriba asteriscos en el password y quede mas profesional.

SaLUDOS.

DUDA donde pongo la contraseña que yo quiero tendria que asignarsela a pass??
pass= (ala contraseña que quiero) seria asi ono?


tambien me tira error en el ultimo then

[CARRY-ON]

Private Sub Command1_Click()
If Text1 = "hola" Then
MsgBox "osii"
End If
End Sub

Private Sub Form_Load()
Dim pass As String
pass = hola
 

End Sub

********************************************
gracias ya lo hice lo puse asi Private Sub Command1_Click()
If Text1 = "hola" Then
MsgBox "osii"
End If
End Sub

Private Sub Form_Load()
Dim pass As String
pass = hola
 

End Sub

hice la comparacion en un boton que le puse aceptar si es la correcta le puse un msgbox pa probarlo no mas pero si no es correcta como le hago pa mostrar un mensaje??

[ReViJa]

Código [Seleccionar] Expandir

If Text1 = "hola" Then
      MsgBox "osii"
else
      MsgBox "oNoo"
End If

[CARRY-ON]

else era LA HUEA JAJAAJ GRACIAS ;Dse me havia olvidado por completo

[_Sergi_]

else era LA HUEA JAJAAJ

Claro que si