Для каждого следующего значения до следующего

Question

мне интересно, если я мог бы получить значение следующего значения в Для каждого до следующего заявления

Если у меня есть этот код:

For Each i As String In myStringArray 
    'Do Something with i 
Next 

Могу ли я есть что-то подобное, только я делаю или проверить следующее значение:

For Each i As String In myStringArray 
    'Do Something with i 
    'Check the Next Value of i 
Next 

Answer 1

Вы можете сделать наоборот и сохранить последний пункт, но действуют на него:

Dim last As String = Nothing 

For Each i As String In myStringArray 
    If last IsNot Nothing Then 
     ' Treat last as current, i as next 
    End If 

    last = i 
Next 

Answer 2

не используйте for each петлю, используйте for петлю и индекса в массиве.

For index As Integer = 0 To myStringArray.Length 
    ... 
Next 

Answer 3

Нет не в для каждого, но вы можете использовать индекс вместо этого, если он является массив

For i As Integer = 0 To myStringArray.Length - 1 
    Dim s As String = myStringArray(i) 
    'Do Something with s 
    If i - 1 < myStringArray.Length Then 
     Dim nexts as String = myStringArray(i + 1) 
     'Check the Next Value of s = nexts 
    End If 
Next