últimos mensajes de: Syphroot

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

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