为什么我收到这样的错误？ “'12'的无效参数对'index'无效” [英] Why am I receiving an error like this? "Invalid Argument of '12' is not valid for 'index'"

问题描述

Dim x As Integer
       Dim x1 As Integer
       Dim check As String = "select accessid from userform_tab where accessid = '" & cboposition.Text & "'"
       Dim ctr As Integer

       CLSCONN = New C_connection
       CLSCONN.ACCESS_INDREC(check)

       For x = 1 To lvsettings.Items.Count
           lvsettings.Items(x).Checked = False  ==> I always encountered an error here saying , "Argument Out of Ranged was unhandled"
"Invalid Argument  = Value of '12' is not a valid for 'index'"
"parameter name:index"
       Next

       With CLSCONN.ds
           For ctr = 0 To .Tables(0).Rows.Count - 1
               If .Tables(0).Rows(ctr)("extra") = 0 Then
                   For x1 = 0 To lvsettings.Items.Count - 1
                       lvsettings.Items(x1).Checked = True
                   Next
               End If
           Next

       End With

推荐答案

简单：数组从0运行到计数-1

尝试：

Simple: Arrays run from 0 to count -1
Try:

For x = 0 To lvsettings.Items.Count -1

相反。

这篇关于为什么我收到这样的错误？ “'12'的无效参数对'index'无效”的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！