hola bueno lo eh probado epro no se mira lo eh cargado con este codigo
Código:
Private Sub cmdOpen_Click()
On Error GoTo ErrOut
Dim file_data As String
Dlgopen.Filter = " Archivos de Texto (*.txt)|*.txt"
Dlgopen.ShowOpen
'Codigo encargado para cargar textos en un control TextBox
txtTexto.Text = vbNullString
Open Dlgopen.FileName For Input As #1
While Not EOF(1)
Line Input #1, file_data
txtTexto.Text = txtTexto.Text & file_data & vbNewLine
Wend
Close #1
ErrOut:
End Sub
bueno pero me sale con separadores y yo kiero ke me salga linea a linea porke en el texto esta asi. :
y en el txtobox em sale asi ;
y bueno todo en una sola linea ayudame porfavor
bueno eso es una parte
ya que la verdad no entiendo tu codigo ya que coloco en text1 la palabra que quiero buscar y no me aparesene ninguno de los labels bueno lo que pasa es ke resien empiso en esto ..gracias por ayudarme ..spero tengas tiempo para responderme gracias
