Hallo,
ich möchte gerne 18 Buttons mit einem Text und einer Variable bestücken. Leider scheitert es aktuell daran das nicht Insgesamt 36 Werte ausgelesen werden können (Text, Zahl).
Wie ist es möglich, falls er keinen Wert findet das ganze zu überspringen und es dir Auslesewerte dennoch hochsetzt ?
Folgenden Code habe ich aktuell
Code
webbrowser1.Navigate(URL & "data.php?artikel&gruppe=" & ButtonClick)
Do While webbrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
Loop
If webbrowser1.ReadyState Then
Dim st() As String = webbrowser1.DocumentText.Split("^")
For i = 1 To 18
Dim myLabel As Button = CType(Me.Controls("GButton" & i), Button)
myLabel.Text = st(Auslesewert)
Auslesewert += 1
numbers(i) = st(Auslesewert)
Auslesewert += 1
Next
End If
Alles anzeigen