title image


Smiley Re: String umwandeln in Array VB.Net
Hi!



Dieses interpretiert die Eingabe in ein 2-dimensionales Integer-Array (Start-Wert - End-Wert)

Also EinzelZahlen, z.B. 8 ist gleichbedeutend mit 8-8.







    Dim PrintRanges(,) As Integer



    Private Sub btTakeOver_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _

            Handles btTakeOver.Click

        Dim sRanges As String() = txtPrintRanges.Text.Split(";"c)

        ReDim PrintRanges(sRanges.Length - 1, 1)

        Try

            For I As Integer = 0 To sRanges.Length - 1

                Dim sRange As String() = sRanges(I).Split("-"c)

                PrintRanges(I, 0) = Integer.Parse(sRange(0))

                If sRange.Length > 1 Then

                    PrintRanges(I, 1) = Integer.Parse(sRange(1))

                Else

                    PrintRanges(I, 1) = PrintRanges(I, 0)

                End If

            Next

        Catch Ex As Exception

            MsgBox("Ungültige Eingabe")

        End Try

    End Sub Code eingef�gt mit Syntaxhighlighter 1.16

Hoffnung trügt.

(eigentlich dürfte man im Spotlight-VB-Forum keine Fragen stellen, wenn man nicht vorher auf ActiveVB geguckt hat)




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: