elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Como proteger una cartera - billetera de Bitcoin


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 [8] 9 10 11 12 13 14 15 16 17
71  Programación / Programación Visual Basic / Re: ayuda con winsock(no tan basico) en: 20 Febrero 2007, 22:12 pm
mmm pues... no uses winsock, mejor usa la clase CSocketMaster... ya se ha hablado de esto, me parece que en el foro de troyanos- viruz hay gran parte de eso. Asi no nececitas un OCX, ni nada, porque el programa traeria su propio socket...

saludos.
72  Programación / Programación Visual Basic / Re: Com puedo saber tamaño de archivo? en: 23 Enero 2007, 19:34 pm
Si, pero LOF es para archivos abiertos con Open "Archivo"...etc etc...

Tambien lo puedes hacer con FileLen si no mal recuerdo y sin abrir el archivo.

73  Programación / Programación Visual Basic / Re: Bajar automáticamente el scrollbar de un textbox o richbox en: 22 Enero 2007, 17:37 pm
Claro,
Código:
textbox.selstart=len(textbox.text)
... en el evento change del textbox


saludos...
74  Programación / Programación Visual Basic / Re: Funcion de Expresion logica. en: 22 Enero 2007, 17:29 pm
No es posible, de hecho creo que en ningun lenguaje porque son operaciones de comparacion y estos caracteres tienen significados especiales para cada lenguaje...
 por cierto, hay una errata (aunque asi funciona) pero para que este mejor especificado declara la funcion asi:

Function LogicaSI(Valor1 as Integer, Operacion as String, Valor2 as Integer, Resultado as Integer) as Integer

o el tipo que quieras devolver...

saludos
75  Programación / Programación Visual Basic / Re: Funcion de Expresion logica. en: 22 Enero 2007, 02:06 am
Supongo quieres una funcion que se definiria algo asi:

Código:
Function LogicaSI(Valor1 as Integer, Operacion as String, Valor2 as Integer, Resultado as Integer)

LogicaSI(10,>,9,1)

Lo que pienso que quieres es que tome el "10" haga la operacion ">" mayor que con el segundo valor "9" y si es verdadero devuelva el valor que le pones al cuarto parametro... si es asi haz algo asi:


Código:

Function LogicaSI(Valor1 as Integer, Operacion as String, Valor2 as Integer, Resultado as Integer)

   Select Case Operacion
   
      Case ">"
           
           If Valor1 > Valor 2 Then LogicaSI = Resultado
       
      Case "<"
           
           If Valor1 < Valor 2 Then LogicaSI = Resultado

      Case "="

           If Valor1 = Valor 2 Then LogicaSI = Resultado

      Case "<>"

           If Valor1 <> Valor 2 Then LogicaSI = Resultado

     'Como ves, esto da para mucho, por ejemplo:

      Case ">="

           If Valor1 >= Valor 2 Then LogicaSI = Resultado

      Case "<="

           If Valor1 <= Valor 2 Then LogicaSI = Resultado

   End Select

End Function

Y para hacer la llamada a la funcion con los valores que tienes y ponerlos en un TextBox asi:

Código:

Txt.Text = CStr( LogicaSI(10, ">", 9, 1) )


El operando lo pones entre comillas y listo...

saludos
76  Programación / Programación Visual Basic / Re: mantener consola en: 22 Enero 2007, 01:52 am
Has intentado algo asi:??

Código:
Shell "cmd /k netstat", vbNormal

Creo tambien se puede con la api ShellExecute
77  Programación / Programación Visual Basic / Re: Colores en ListBox en: 22 Enero 2007, 01:48 am
Con este control no se puede, pero hay otro que si lo permite. Lo agregas en los complementos (Micosoft Windows Common Controls 6.0) se llama ListView

busca en google, incluso puedes agregar imagenes, etc... un control muy flexible y no muy complicado de usar
78  Programación / Programación Visual Basic / Re: Personalizar error en: 22 Enero 2007, 01:18 am
Espero te ayude esto:

Código:

Const ERR_ESPERADO = 0

Sub Rutina()
   
   On Local Error Goto Controlar

   ' Codigo

   Exit Sub

Controlar:
   
   If Err.Number = ERR_ESPERADO then
       
         MsgBox "Mensaje personal"
         
         Resume Next
         
   End If

End Sub


Solo ajustas la constante al valor del error esperado.

saludos
79  Informática / Electrónica / Re: ¿Por que no me funciona? en: 13 Enero 2007, 22:08 pm
Asi es, lleva una configuracion, por eso tiene puerto usb, de la pagina del fabricante baja el manual correspondiente y ahi te vas a enterar.

saludos.
80  Programación / Programación Visual Basic / Re: Problemas para borrar un archivo en: 1 Enero 2007, 08:53 am
hay archivos con atributos del sistema u ocultos que no se pueden, o no se dejan borrar. Lo que hay que hacer es cambiarles el atributo, algo asi:

Código:
SetAttr "Ruta", vbNormal

'Y luego el kill

Kill "Ruta"

Con eso se deberia borrar, el proceso debe estar terminado para poder eliminarlo....

saludos
Páginas: 1 2 3 4 5 6 7 [8] 9 10 11 12 13 14 15 16 17
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines