Normas del foro

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Diciembre 04, 2008, 01:15:10
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Problemas Propuestos. 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Problemas Propuestos.  (Leído 390 veces)
YoungHacker
Visitante
« en: Julio 23, 2006, 02:35:14 »
juegos gratis
En línea
Sh4k4
.
Colaborador
*****
Desconectado Desconectado

Mensajes: 565


SHAKA


Ver Perfil WWW
« Respuesta #1 en: Julio 23, 2006, 04:07:08 »
En línea
Arayashiki
YoungHacker
Visitante
« Respuesta #2 en: Julio 23, 2006, 01:06:29 »
En línea
Biocode
Habitual
*****
Desconectado Desconectado

Mensajes: 364



Ver Perfil
« Respuesta #3 en: Julio 23, 2006, 02:01:39 »
« Última modificación: Julio 23, 2006, 02:05:10 por Biocode » En línea
YoungHacker
Visitante
« Respuesta #4 en: Julio 23, 2006, 02:21:58 »
En línea
Sh4k4
.
Colaborador
*****
Desconectado Desconectado

Mensajes: 565


SHAKA


Ver Perfil WWW
« Respuesta #5 en: Julio 24, 2006, 01:18:55 »
suushi! Cheesy  la idea esta presente, es cosa de jerga del hack sobr3 3sc1b15 y kit4r l0 k storv4 precisamente pa loz conocedorez de ezto lo importante es la INFO ya se encryptada o echa bolitaz....<> o = es cosa de gustos el trim es valido tanto como replace es cuestion de estilos de programacion, algunos usan diferentes bucles otros timers jeje y otros sleeps 0 contadorez pero creo que lo esencial es que funcione y no esta de mas superarse y hacer un codigo idoneo, perfecto a la vista pero ....... saludoz  Cool

If App.PrevInstance = True Then
End
End If

a

If App.PrevInstance = True Then End

reduciendo kitando el "end if" haciendo que el IF quede en una linea....
En línea
Arayashiki
YoungHacker
Visitante
« Respuesta #6 en: Julio 24, 2006, 01:26:12 »
Cita de: Sh4k4 en Julio 24, 2006, 01:18:55
suushi! Cheesy  la idea esta presente, es cosa de jerga del hack sobr3 3sc1b15 y kit4r l0 k storv4 precisamente pa loz conocedorez de ezto lo importante es la INFO ya se encryptada o echa bolitaz....<> o = es cosa de gustos el trim es valido tanto como replace es cuestion de estilos de programacion, algunos usan diferentes bucles otros timers jeje y otros sleeps 0 contadorez pero creo que lo esencial es que funcione y no esta de mas superarse y hacer un codigo idoneo, perfecto a la vista pero ....... saludoz  Cool

If App.PrevInstance = True Then
End
End If

a

If App.PrevInstance = True Then End

reduciendo kitando el "end if" haciendo que el IF quede en una linea....

si es asi comienza hablar con el gato ya ke yo no estoy en la zona de hacking sino en la zona de programacion  Grin a ver si le digo al gato que te responda ya que esta es mas su area... solo quiero aprender viejo.

Feuer frei!!!... Nos veremos...  Cool
En línea
Sh4k4
.
Colaborador
*****
Desconectado Desconectado

Mensajes: 565


SHAKA


Ver Perfil WWW
« Respuesta #7 en: Julio 24, 2006, 01:35:09 »
Pues no tiene gran ciencia... 4 n0 s3r k n0 3nty3nd4z pero wherever! saludoz..............  Cool

arbeit mach frei ??
En línea
Arayashiki
YoungHacker
Visitante
« Respuesta #8 en: Julio 24, 2006, 01:43:32 »
Cita de: Sh4k4 en Julio 24, 2006, 01:35:09
Pues no tiene gran ciencia... 4 n0 s3r k n0 3nty3nd4z pero wherever! saludoz..............  Cool

arbeit mach frei ??
Es simple es como ponerte mi firma y hazla igual   Wink pero cambiale las capas a una formaastracta  y usa un par de pinceles en la parte oculta de la capa que estoy usando en el renders... y bla bla bla bla... ya catates programador...  Wink

NOs Veremos...
En línea
YoungHacker
Visitante
« Respuesta #9 en: Julio 27, 2006, 12:32:30 »
En línea
Biocode
Habitual
*****
Desconectado Desconectado

Mensajes: 364



Ver Perfil
« Respuesta #10 en: Julio 27, 2006, 07:38:24 »
En línea
YoungHacker
Visitante
« Respuesta #11 en: Julio 27, 2006, 11:50:35 »
Citar
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) = "," Then KeyAscii = 0
End Sub

Lo eh hecho de esta forma  ahora si no entra (,)  Grin

Pero sigue mi pero.... ahora lo malo que el punto (.) lo puedo poner varias veces  :-\ este puto

 entra al textbox como si fuera su house   Angry Angry alguna idea como podria decir que solamente

 entre una  :-\ vez

NOs Veremos...  :-\
En línea
YoungHacker
Visitante
« Respuesta #12 en: Julio 27, 2006, 06:44:39 »
Problema propuesto.... Problema resuelto...  Cheesy

Citar
Private Sub Command1_Click()
Dim rpta As String
If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Then
            MsgBox ("Falta incresar datos")
        Else
rpta = Val(Text1.Text) * Val(Text2.Text) * Val(Text3.Text)
If rpta > 600 Then
            Label1 = rpta - (rpta * 0.2)
        Else
            If rpta > 400 Then
                Label1 = rpta - (rpta * 0.15)
            Else
                Label1 = rpta
            End If
        End If
        End If
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not ((KeyAscii >= 48 And KeyAscii <= 57) Or KeyAscii = 46 Or KeyAscii = Cool Then KeyAscii = 0
    If (KeyAscii = 46) And InStr(1, Text1.Text, ".") > 0 Then KeyAscii = 0
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If Not ((KeyAscii >= 48 And KeyAscii <= 57) Or KeyAscii = 46 Or KeyAscii = Cool Then KeyAscii = 0
    If (KeyAscii = 46) And InStr(1, Text2.Text, ".") > 0 Then KeyAscii = 0
End Sub

Private Sub Text3_KeyPress(KeyAscii As Integer)
If Not ((KeyAscii >= 48 And KeyAscii <= 57) Or KeyAscii = 46 Or KeyAscii = Cool Then KeyAscii = 0
    If (KeyAscii = 46) And InStr(1, Text3.Text, ".") > 0 Then KeyAscii = 0
End Sub

Ejecutable :
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion

Gracias a todos por su aporte y especialmente ah AsDeReL and shower

Ya que a ellos entendi muchas cosas... espero que alguien le sirva....  Wink

NOs Veremos...  Cool
En línea
Páginas: [1] Ir Arriba Imprimir 
Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Problemas Propuestos. « anterior próximo »
Ir a:  


Ranking-Hits
Powered by SMF 1.1.7 | SMF © 2006-2007, Simple Machines LLC