Mensajes

No no me as entendido o no me habeis entendido e pedido que me digais 1 programa pero no hecho por ustedes si no: decirme por ejemplo haz 1 programa que haga esto y esto...

por ejemplo haz 1 programa que presione el botón y se muestre Hola en el text1


pero un programa que se use and,Or,Not osea un programa que tenga que usar and otro Or y otro Not y si puede ser otro con los 3 juntos...



Saludos

 bueno amigos,que necesito que me digáis 3 ejercicios difrente para usar And luego otro para usar Or y otro para Not... y luego si podéis uno para usar los 3 osea que se use and,or y Not

lo que he sacado en claro es que para aprender a programar hay que practicar, practicar y seguir practicando... es como todo, cuanto más practicas... o terminas por aburrirte o aprendes...

Saludos y gracias

Amigo entra aquí...

Esto son los nuevos:  http://www.hackxcrack.es/cuadernos/
Esto son los antiguos: http://www.hackxcrack.es/cuadernos_antiguos/

Saludos

Amigo esto se puede buscar por google es fácil aquí lo tienes y si puedes invitame jaja te digo mi msn por privado

http://antoniosanjuan.com/como-invitar-red-social-google-plus-sin-invitaciones/

Saludos

Bueno pues eso que estoy aprendiendo hacer VPN (no para nada ilegal) si no que quiero aprender mas y mas...

No encuentro ninguna, si alguien me puede decir algunas se lo agradecería

Saludos y gracias..

Seba no se hacerlo pero ya voy aprenderlo dentro de nada, ya os contare

Saludos y gracias

Edu es .exe, no .bat no se a que te refieres de .bat

Saludos

Todo eso esta muy bien, pero es lo mismo llevaría todo igual... de todas manera lo e probado y sigue igual, una pregunta:

¿Lo habéis probado ustedes y os da bien?  es para sacarme de duda por que si con el código mio os funciona entonces el problema esta en que yo no e puesto bien el directorio y me sacaría bastantes dudas...

Saludos y gracias.

Pero si modifico la condición solo me pone que es mayor que pero no encuentra el directorio...

y si modifico el private function por el tu yo

Código [Seleccionar] Expandir

Private Function Existe(Archivo As String) As Boolean
If Len(Dir(Archivo)) > 0 Then Existe = True
End Function

no esta definido el Label1 y daría error...

Saludos...

Bueno amigos este es mi programa

Código (vb) [Seleccionar] Expandir

Private Function Existe(Archivo As String) As Integer
    Existe = Len(Dir$(Archivo))
    If Existe Then
        Label1 = Archivo & " Si existe"
    Else
        Label1 = Archivo & " No existe"
    End If
End Function


Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()

    Dim A As Integer, Nombre As String

    Show

    Label1 = ""
    Nombre = "C:\Autoexec.exe"
    A = 5
    If A > 10 Then
        If Existe(Nombre) Then
            Print A; "mayor de 10 y " & Nombre & " existe"
        Else
            Print A; "es mayor de 10 pero " & Nombre & " no existe"
        End If
    Else
        Print A; "no es mayor de 10 o " & Nombre & " no existe"
    End If
End Sub

Entonces yo cree en en c:/ un archivo llamado asi (autoexec.exe) pero dice que no se encuentra

Eso por que ¿que hice mal?

Saludos