|
Zdravím všechny programátory, mám text ( jednu větu ve které je číslo ). Vyhledal jsem je a zobrazil v Labelu. Pokud je v textu ale čísel více nevím jak mám čísla uložit do více proměnných.
Dim prohledavac As String
Dim retezec As String = Label1.Text
Dim test() As String = retezec.Split(" ")
For i As Integer = 0 To test.Length - 1
prohledavac = test(i)
If IsNumeric(prohledavac) Then
Label3.Text = prohledavac
End If
Next
Napadlo mě taky tohle ale asi to bude špatně i když to fakčí ale výsledek musím potom rozdělit.
Dim prohledavac As String
Dim retezec As String = Label1.Text
Dim test() As String = retezec.Split(" ")
For i As Integer = 0 To test.Length - 1
prohledavac = test(i)
If IsNumeric(prohledavac) Then
Label3.Text = Label3.Text & ";" & prohledavac
End If
Next
Poradí prosííím někdo? Děkuji Pavel :)
|