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编辑过]

没人知道原因吗！
只好用split()函数了

Array 要求传入 的是 具体每一个数据，而不是指向 数据的一个字符串。
如果是一个字符串，就使用 split 函数了。

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