字符串和數組

Question

我有Visual Basic的這個功課，我明白的代碼是想這樣做，但我不知道該怎麼辦呢

反正這是不完整的代碼

Function GetNextItem(NextLine As String) As String(,) 
    Dim answer(0, 1) As String 
    Dim String1, String2 As String 
    Dim i As Integer = 0 'variable to store what character you are currently looking at 
    String1 = "" 
    String2 = "" 
    'Loop through the string until you hit a comma. Everything before the comma gets added 
one character at a time to String1 


    'Add one more to i so it moves passed the comma 

    'Loop from that character to the end of the string. Anything left gets added to String2 

    'First block of the 1x2 array gets String1 
    'Second block of the 1x2 array gest String2 

    'The 1x2 array is returned 
    Return answer 
End Function 

的說明在評論 我做了一點。我不需要我想要找到一種方法來解決這個問題。 我真的需要這方面的幫助：3

Answer 1

這是你想要的嗎？

Function GetNextItem(NextLine As String) As String(,) 
    Dim answer(0, 1) As String 
    Dim String1 As String = "", String2 As String = "" 
    Dim i As Integer = 0 'variable to store what character you are currently looking at 
    'Loop through the string until you hit a comma. Everything before the comma gets addedone character at a time to String1 
    For Each character In NextLine 
     i = NextLine.IndexOf(character) 
     If character <> ","c Then 
      String1 += character 
     Else 
      Exit For 
     End If 
    Next 

    'Add one more to i so it moves passed the comma 
    '?????? - I don't think this part is needed 

    'Loop from that character to the end of the string. Anything left gets added to String2 
    Dim counter As Integer = -1 
    For Each character In NextLine 
     ' Can not use NextLine(character) here, because a string can have more than once the same character 
     counter += 1 
     If counter <= i Then Continue For 
     String2 += character 
    Next 

    'First block of the 1x2 array gets String1 
    answer(0, 0) = String1.Trim 

    'Second block of the 1x2 array gest String2 
    answer(0, 1) = String2.Trim 

    'The 1x2 array is returned 
    Return answer 
End Function