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


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Texto seleccionado saber el numero de linea que se encuentra 		0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Texto seleccionado saber el numero de linea que se encuentra  (Leído 2,337 veces)
ELGRANSOLRAC

Desconectado Desconectado

Mensajes: 91


Ver Perfil
Texto seleccionado saber el numero de linea que se encuentra
« en: 30 Abril 2006, 21:09 pm »
Hola lo que yo queria es que cuando tengo seleccionado un texto saber en que numero de linea se encuentra en la 3,5,88,9999, la que sea gracias a quien pueda ayudarme
En línea
VirucKingX


Desconectado Desconectado

Mensajes: 541


VirucKingX


Ver Perfil
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #1 en: 30 Abril 2006, 21:19 pm »
No te entendi  :huh: exlicate un poco mejor  :-(
En línea


Bye
ELGRANSOLRAC

Desconectado Desconectado

Mensajes: 91


Ver Perfil
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #2 en: 1 Mayo 2006, 00:13 am »
Lo que quiero es abrir un archivo de texto y en una de las lineas del texto comenzara por "Pass" no se cual es la linea pero tiene que ser la linea que empiece el texto con los mismos caracteres "Pass" lo entendiste ahora.Gracias por tu interes
En línea
NYlOn


Desconectado Desconectado

Mensajes: 842


OOOOHHHHHH, TARAGÜIIII xDDDDDD


Ver Perfil WWW
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #3 en: 1 Mayo 2006, 04:14 am »
Suponiendo que tu archivo esta cargado en la variable Texto
Código:
For i = 1 to len(Texto)
    If Mid(Texto, i, 4) = "Pass" then
        MsgBox "Pass se encuentra en la linea " & i
    End If
Next i
   

No se si es eso lo que buscas...
En línea
Gorky


Desconectado Desconectado

Mensajes: 770



Ver Perfil WWW
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #4 en: 1 Mayo 2006, 11:46 am »
Cita de: NYlOn en  1 Mayo 2006, 04:14 am
Suponiendo que tu archivo esta cargado en la variable Texto
Código:
For i = 1 to len(Texto)
    If Mid(Texto, i, 4) = "Pass" then
        MsgBox "Pass se encuentra en la linea " & i
    End If
Next i
   

No se si es eso lo que buscas...

Eso es erroneo. Eso te diria la posicion respecto de los caracteres en la que se encuentra pero no la linea en la que esta. A ver si es esto lo que buscas:

Código:
Open "archivo.txt" For Input As #1
For i = 1 To LOF(1)
   Input #1, linea
   If left(linea, 4) = "pass" Then encontrado = i
Next i

No lo he probado en VB ya que no tengo el compilador instalado pero supongo que funcionara.
« Última modificación: 1 Mayo 2006, 12:41 pm por Gorky » En línea
ELGRANSOLRAC

Desconectado Desconectado

Mensajes: 91


Ver Perfil
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #5 en: 1 Mayo 2006, 12:03 pm »
Hola  en esta linea me da el error

Input #1, linea '
 "La entrada de datos ha sobrepasado el final del archivo, erro 62.
no lo entiendo...
En línea
Gorky


Desconectado Desconectado

Mensajes: 770



Ver Perfil WWW
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #6 en: 1 Mayo 2006, 12:40 pm »
Fallo mio. Creo que es por esto:

Código:
For i = 0 To LOF(1)

Cambialo por:

Código:
For i = 1 To LOF(1)
En línea
ELGRANSOLRAC

Desconectado Desconectado

Mensajes: 91


Ver Perfil
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #7 en: 1 Mayo 2006, 13:10 pm »
Sigue dandome el mismo error.
En línea
MazarD
Colaborador
***
Desconectado Desconectado

Mensajes: 885


mazard.info


Ver Perfil WWW
Re: Texto seleccionado saber el numero de linea que se encuentra
« Respuesta #8 en: 1 Mayo 2006, 23:52 pm »
El problema está en que input se usa así:
resultado=input(numero de caracteres, #canal)

Necesitas saber el número de caracteres a recoger por lo que deberías cargar todo el archivo en memória i buscar.
Personalmente prefiero hacerlo de este modo:

Código:
encontrado=false
while not eof(1) and not encontrado
      line input #1, linia
      cnt=cnt+1
      if left$(linia,4)="Pass" then 
           encontrado=true
           msgbox "Encontrado en" & cnt
      endif
wend

Cual es mejor? pues uno te consume mas memoria y el otro mas entradas y salidas, aunque a este nivel es indiferente.

Saludos
     
En línea
-Learn as if you were to live forever, live as if you were to die tomorrow-

http://www.mazard.info
irc://irc.freenode.org/elhacker.net
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Solucionado] Insertar 2 textos distintos a un texto del textbox seleccionado :S
Programación Visual Basic 		VanX 6 4,637 Último mensaje 13 Julio 2011, 20:21 pm
por raul338
Enviar Ctrl+c a una ventana de windows para copiar un texto seleccionado
.NET (C#, VB.NET, ASP) 		arenoide 3 5,903 Último mensaje 16 Agosto 2011, 00:55 am
por Meta
Eliminar texto seleccionado al presionar una tecla
.NET (C#, VB.NET, ASP) 		oliverm 2 3,413 Último mensaje 3 Junio 2013, 20:41 pm
por oliverm
generador de texto y numero
Programación Visual Basic 		asdexiva 2 2,000 Último mensaje 25 Diciembre 2014, 05:31 am
por Wickown
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines