vb.net - 将值设置为不存在的数组项？

Question

请看下面的代码:

Try
  Dim Reader As New System.IO.StreamReader(PositionsFileName)
  Do While Reader.Peek() <> -1
    Dim Positions() As String = Reader.ReadLine().Split("|")
    If (Positions(0) Is Nothing) Or (Positions(1) Is Nothing) Or (Positions(2) Is Nothing) Then
      ' something
    End If
  Loop
Catch ex As Exception
  ex.Source = Nothing
End Try

我正在阅读一个文件并期望格式化某事|某事1|某事2。我试图将它设置为不存在的数组索引“Nothing”(文件格式已损坏)，以便 If 语句顺利进行，但似乎我做错了。你能给我一些提示吗？

Answer 1

如果你这样做 Split("|")并且只有 2 个项目(例如， something|something1 )， Positions(2)不会Nothing ，它不会在那里。所以你的代码会引发一个异常，关于 index out of bounds of the array .

如果您需要 Positions(2)包含 Nothing在这种情况下，您的代码可能如下所示:

Dim Positions(2) As String
Dim tmpArray() As String = Reader.ReadLine().Split("|")
For i = 0 To UBound(Positions)
  If i <= UBound(tmpArray) Then
    Positions(i) = tmpArray(i)
  Else
    Positions(i) = Nothing
  End If
Next