主题：读取ini文件指定项的所有值问题
Temiral
[专家分：50] 发布于 2009-09-03 20:17:00
Dim I As Integer
Dim j As String
Dim arr() As String
I = 1
Do
j = ReadFromIni(App.Path + "\test.ini", "选项", I)
If j <> " " Then
Combo2.AddItem arr(I) = ReadFromIni(App.Path + "\test.ini", "选项", I) '选项
I = I + 1
Else
Exit Do
End If
Loop
---------------------------------
我想将test.ini文件里选项的所有值赋到combo控件上。但写下以上代码编译时就出现下标越界，这应该怎样修改。谢谢各位大侠帮忙修改一下。
回复列表 （共5个回复）
沙发
天天学习 [专家分：4570] 发布于 2009-09-04 11:33:00
arr()数组的下标都没定义，相当于数组结构都没初始化。当然下标越界了 .
另外：
[quote]Combo2.AddItem arr(I) = ReadFromIni(App.Path + "\test.ini", "选项", I) '选项[/quote]
有问题，自己看吧。
板凳
一江秋水 [专家分：9680] 发布于 2009-09-04 17:05:00
If j <> " " Then
ReDim Preserve zt(I)
....
I = I + 1
Else
3 楼
bcahzvip [专家分：6040] 发布于 2009-09-06 02:16:00
[url=http://bbs.pfan.cn/downfile.asp?fileid=4483]例子[/url]
4 楼
Temiral [专家分：50] 发布于 2009-09-09 01:11:00
收到bcahzvip的例子明白了窗体的怎样调用类模块，但不是很明白list的传值怎样从ini文件写进去。
5 楼
gfan [专家分：60] 发布于 2009-10-01 14:10:00
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
本人计算机相关专业毕业，熟悉VC,Delphi,VB及各种网页编程对于数据库编程有丰富的经验，擅长socket和windows编程，有三年做毕业设计的经验，主要作品有数控工艺参数查询系统等，有需要的朋友请加Q：383147818 请注明：pfan毕设
（非诚勿扰，谢谢合作！）
我来回复
您所在位置：