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

 

 


Tema destacado: Recopilación Tutoriales y Manuales Hacking, Seguridad, Privacidad, Hardware, etc


  Mostrar Mensajes
Páginas: 1 [2] 3 4 5 6
11  Programación / Programación Visual Basic / Re: necesito un codigo de vb en: 12 Mayo 2007, 20:02 pm
De un control de cibercafe para un trabjo final que tengo que entregar y no tengo idea de como empezar.
osea cliente/servidor si alguien puede ayudarme se lo agradeceria infinitamente.
mi correo es mahiro_46@hotmail.com

si buscases un poco más en google, encontrarias bastantes programas capaces de hacer eso.

aqui te dejo un enlace
http://www.lawebdelprogramador.com/buscar/mostrar.php?apa1=6&apa2=16

Saludos
12  Programación / .NET (C#, VB.NET, ASP) / Re: calcular valor a traves de convert.tosingle en VB.net 2005 Express en: 7 Mayo 2007, 02:34 am
creo que no se entiende mi explicación, aqui les va un poco más de tallada:

lo unico que quiero cambiar es la parte de la función  ValorFuncion para que en lugar de tener el valor inicializado en "x+2", el usuario a partir de un TextBox ingrese el valor y esa función se remplace en el return
osea que el return quede algo así:

Return Convert.ToSingle(ValorGuardadoenTextBox)

el metodo completo que uso y no me causa problemas es este:



 
Código:
Function ValorFuncion(ByVal X As Double) As Single
        Return Convert.ToSingle(X + 2)
    End Function



Private Sub ciFuncion_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles ciFuncion.Paint
        Dim t As Single
        Dim Xmin, Xmax As Single
        Dim Ymax, Ymin As Single
        ctXMin.Text = "-0.83"
        ctXMax.Text = "6.30"

        Xmin = Convert.ToSingle(ctXMin.Text)
        Xmax = Convert.ToSingle(ctXMax.Text)

        If (Xmin >= Xmax) Then
            MsgBox("X máx tiene que ser mayor que X mín")
            Exit Sub
        End If

 
        Ymin = ValorFuncion(Xmin)
        Ymax = ValorFuncion(Xmin)
        End If
    End Sub
13  Programación / .NET (C#, VB.NET, ASP) / calcular valor a traves de convert.tosingle en VB.net 2005 Express en: 3 Mayo 2007, 02:19 am
estoy haciendo una pequeña aplicación sobre Visual Basic.net 2005 Express Edition (no es gran cosa porque mis conocimientos son casi nulos en .net) en la cual tomo un valor de un TextBox, valido el campo y ahora si regreso el resultado.

miren si lo hago de esta forma si funciona

Código:
'los valores de X los definí desde un principio entonces
'el usuario solo ingresa los valores de su función a evaluar
Function ValorFuncion(ByVal X As Double) As Single
        Return Convert.ToSingle(x + 2)
End Function

pero así no es el caso, lo que quisiera hacer es que tome el valor del textbox lo valide y calcule el valor,  no tengo problemas hasta la validación cuando tengo problema es al asignarle el valor a la funcion

Código:

Function ValorFuncion(ByVal X As Double) As Single
        Return Convert.ToSingle(ValReturn)
    End Function
'Aqui ValReturn es el valor que se me regresa una ves validada
'la función la cual se regresa como un string

Espero puedan ayudarme porque al ejecutar el código me devuelve este error

"La cadena de entrada no tiene el formato correcto"
y la verdad no sé como hacerle.



Gracias y saludos
14  Programación / Programación Visual Basic / Re: contar saltos de linea RichTextBox VB en: 6 Abril 2007, 01:36 am
hay si funciona T.T

Celaya eres mi nuevo dios en Visual Basic...

gracias por el consejo

oye una pregunta

porque i = lpos + 2

no entiendo porque lo incrementas 2 veces

15  Programación / Programación Visual Basic / Re: contar saltos de linea RichTextBox VB en: 5 Abril 2007, 23:21 pm
gracias por el consejo... pero lo he implementado de la siguiente forma (con un ciclo FOR) y funciona pero por ejemplo si tengo en el espacio 3 un salto de linea, en el espacio 5 otro y en el 7 otro, lo que hace mi programa es que se detiene en el espacio 3 e imprime como 20 veces que esta en el espacio 3 y asi para el 5 y 7

este es el codigo ayudenme porfavor

Código:
Dim sText, sFnd
Dim lPos
Dim cont As Integer

    cont = 1
  'Texto en el cual se va a buscar, puede ser un cuadro de texto o cualquier String.
 
  sText = RichTextBox1.Text
  sFnd = vbCrLf 'Texto buscado.

  NumText = Len(RichTextBox1.Text)
 
  For i = 1 To NumText
   lPos = InStr(i, sText, sFnd)
  If lPos > 0 Then
    Call MsgBox("La cadena se encontró en la posición " & lPos, vbExclamation)
  Else
    Call MsgBox("No se encontró la cadena")
  End If
   'cont = cont + 1
 Next i

16  Programación / Programación Visual Basic / contar saltos de linea RichTextBox VB en: 4 Abril 2007, 03:42 am
Hola estoy haciendo un proyecto para la escuela el cual consiste en abrir un documento de texto contar los saltos de linea y cortar el documento ejemplo

#de lineas maximo por hoja = 25
# numero de lineas del documento = 100

Total de paginas generadas = 100/25 = 4

todo esto lo estoy manejando por medio de un richtextbox pero al momento de realizar la búsqueda no funciona mi código llevo toda la tarde y no encuentro solución podrían ayudarme


Código:
Dim sText, sFnd
Dim lPos
Dim cont As Integer

  cont = 1
  sText = RichTextBox1.Text 
  sFnd = vbCrLf     'Texto buscado (salto de linea).

'pretendo ir avanzando por el texto para hacer una comparacion
'buscando el salto de linea
 
While Len(RichTextBox1.Text) > cont

 lPos = InStr(1, sText, sFnd)
  If lPos > 0 Then    'Se encontró la cadena

    call MsgBox("La cadena se encontró en la posición " & lPos, vbExclamation)
 ' estos msgbox son temporales, después los sustituiré por la continuación del programa
  Else
    call MsgBox("No se encontró la cadena")
  End If
   cont = cont + 1
   Wend



el problema que tengo es que no puedo moverme entre todos los caracteres que hay en el richtexbox1 para buscar los saltos de linea

ojala puedan ayudarme
17  Informática / Tutoriales - Documentación / Re: How to: Instalar MacOSx86 10.4.5 sobre VmWare 5.5.1 en Windows en: 25 Diciembre 2006, 04:24 am
pregunta
¿funciona sobre un celeron M a 1.5GHZ?
768 mb ram y 64 en video
18  Programación / Programación Visual Basic / Re: mover contenido de listbox a otro en: 10 Diciembre 2006, 20:54 pm
gracias por la ayuda...

ya lo implemente y quedo así

Citar
Expr = StrReverse(grd.TextMatrix(Fila, Columna))
  For k = 1 To Len(Expr)
     Car = Mid(Expr, k, 1)
     PilaList.AddItem Car
  Next k
19  Programación / Programación Visual Basic / mover contenido de listbox a otro en: 10 Diciembre 2006, 03:37 am
hola tengo una pequeña duda...
tengo un listbox que se llama SalidaList entonces quiero sacar el contenido de ese listbox (el ultimo elemento del listbox) invertir su contenido y colocarlo caracter por caracter en otro listbox (PilaList)
he intentado hacer esto... pero no funciona


Código:
Expr = StrReverse(Salidalist.List)
For k = 1 To Len(Expr)
     Car = Mid(Expr, k, 1)
     PilaList.List = Car
     PilaList.ListCount = PilaList.ListCount + 1  'para moverse a la siguiente localidad de pila
Next k


en pocas palabras si supongo que tengoen :
SalidaList
PRUEBA
quiero que en PilaList
A
B
E
U
R
P

... lo que tampoco puedo hacer es que lo escriba en la parte de arriba de la pila si por ejemplo tenemos $ guardado en la pila lo conserve

A
B
E
U
R
P
$

lo estoy intentando con un PilaList.ListCount - 1

podrían ayudarme para saber en que me estoy equivocando
 
20  Programación / PHP / Re: Como Instalar PHP en IIS !!!??? en: 9 Diciembre 2006, 05:46 am
mira lo que encontre, espero te sirva
How to install PHP 5.x on Windows Server 2003 with IIS 6
http://www.peterguy.com/php/install_IIS6.html

bastante bueno el tutorial :)
Páginas: 1 [2] 3 4 5 6
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines