如果vb.net中的Listbox中存在INDEX

时间:2013-06-08 16:39:19

标签: vb.net listbox

我正在运行Do Until Loop并且它将错误索引超出范围。我正在使用此代码:

If Not imgList.Item(i).ToString = Nothing Then

但它不起作用.. 实际上,在添加列表框中的任何值之前调用此循环(在私有子中)。

这是完整的循环..

Dim i As Integer = 0

Do Until i = pagesRange
       If Not imgList.Item(i).ToString = Nothing Then
          'other code
          i += 1

       Else

       End If
Loop

2 个答案:

答案 0 :(得分:1)

为避免索引超出范围异常的给定代码尝试下面的

If imgList.Count < i AndAlso Not (imgList.Item(i).ToString Is Nothing) Then

End If

答案 1 :(得分:0)

记住零基础......

Dim i As Integer = 0

Do Until i = pagesRange -1
       If Not imgList.Item(i).ToString = Nothing Then
          'other code
          i += 1

       Else

       End If
       'why i += 1 not here ?
Loop