Pasar lineas de un TXT como variables ID
Publicado por ricard (13 intervenciones) el 16/02/2018 11:01:41
Me echáis un cable?, soy un inutile, lo reconozco 
Sacando el DO Loop me funciona de PM en el MessageBox y también en Console, pero en ningún sitio más :-(
Gracias de entemano
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Imports System.IOPublic Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim path As String = "C:\Aragon.txt"
Dim readText As String() = File.ReadAllLines(path)
Do
For Each s As String In readText
MessageBox.Show(s)
'Aqui tengo que poner una URL con el ID que me recoja det TXT que luego automatizará la acción con un InvokeMember("click")
Next
Loop Until readText Is Nothing
End Sub
End Class
Sacando el DO Loop me funciona de PM en el MessageBox y también en Console, pero en ningún sitio más :-(
Gracias de entemano
Valora esta pregunta
0