| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 771 人关注过本帖
标题:新人求帮助!Array()函数问题
只看楼主 加入收藏
suzhanpeng82
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2016-9-28
结帖率:0
收藏
已结贴  问题点数:20 回复次数:2 
新人求帮助!Array()函数问题
config.ini文件内容
[Form2]
CaiLiao="默认", "焊接件", "装配件", "45", "Q235A", "65Mn", "40Cr", "ZQA19-4", "ZQSn10-1", "QT600-3", "HT300"

程序如下 想在comcobox中下拉列表中显示
Dim F As String, nStr As String, nSize As Long, S As Long
   F = App.Path & "\config.ini"
   nSize = 255: nStr = String(nSize, 0)
   d = GetPrivateProfileString("Form2", "CaiLiao", vbNullString, nStr, nSize, F)
   S = InStr(nStr, Chr(0))
   If S > 0 Then
   nStr = Left(nStr, S)
   End If
Dim c As Variant
Dim i As Integer
       c = Array(nStr)
        For i = 0 To UBound(c)
           Combo2.AddItem c(i)
        Next
其结果是内容没有分开,求说明错误原因。

[此贴子已经被作者于2016-9-28 15:59编辑过]

2016-09-28 15:47
suzhanpeng82
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2016-9-28
收藏
得分:0 
没人知道原因吗!
只好用split()函数了
2016-09-28 16:04
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:20 
Array 要求传入 的是 具体每一个数据,而不是指向 数据的一个字符串。
如果是一个字符串,就使用 split 函数了。

二个函数的定义也不同,实现的原理也不相同。
array 是把传入的每一个参数当做一个数组元素来处理,你传入一个字符串时,就只有一个元素。
split 是把你传和的一个字符串,按分隔符分隔成一个个数组。


授人于鱼,不如授人于渔
早已停用QQ了
2016-09-28 18:20
快速回复:新人求帮助!Array()函数问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018522 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved