[VB.NET]数组为什么出错啊?急!!1在线等~~~
发布时间：2020-12-16 23:46:12 所属栏目：大数据 来源：网络整理
导读：数组为什么出错啊?急!!1在线等~~~ 我定义了一个数组getarray(),用来接受有select语句查询出的结果,但是运行是总、是报错说 "其他信息: 索引超出了数组界限 ",但是我并没有规定数组的大小啊? Dim getarray() As String = New String() {} Dim j,k As Integer
|
数组为什么出错啊?急!!1在线等~~~ 我定义了一个数组getarray(),用来接受有select语句查询出的结果,但是运行是总、是报错说 "其他信息: 索引超出了数组界限 ",但是我并没有规定数组的大小啊? Dim getarray() As String = New String() {} Dim j,k As Integer k = 0 ...... ''select语句 For j = 0 To Ds1.disease.Count.ToString - 1 getarray(k) = Ds1.disease.Item(j).dis_name.ToString() k = k + 1 Next j disease为表名,dis_name为表的一个字段 __________________________________________________________________________ Dim getarray() As String = New String() {} Dim j,k As Integer k = 0 ''select语句 ReDim Preserve getarray(Ds1.disease.Count.ToString - 1) For j = 0 To Ds1.disease.Count.ToString - 1 getarray(j) = Ds1.disease.Item(j).dis_name.ToString() k = k + 1 '' 这个k没有必要用吧 Next j __________________________________________________________________________ ReDim一下数组，要不然它的UpperBound是-1 __________________________________________________________________________ 也可以使用动态数组啊 Dim getarray as New ArrayList Dim j,k As Integer For j = 0 To Ds1.disease.Count- 1 getarray.add( Ds1.disease.Item(j).dis_name.ToString()) Next j __________________________________________________________________________ （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |