Arrays 读取整个ini部分并放入数组

好的，我有这些函数，我想通过我的vba代码来使用。 这可能是vbs的最新版本

下面是函数

我如何使用它来创建一个函数，它基本上只允许我指定我要查找的部分，然后找到该部分中的每个ini字符串，并将其放入一个数组中并返回该数组，这样我就可以使用它进行循环

编辑：我看到ReadIniSection返回一个巨大字符串中的所有键。 意思是，我需要把它分开

ReadIniSection返回如下内容：

---

“Favnn= FoNavn[] EtTeavnn = Etnavnn”等。[]中间没有括号，它是正方形。可能是它不认识的某个字符。所以我想我应该通过一个split命令来运行它，该命令取a=和平方之间的值。

看看这是否有帮助-在nullchar上拆分\0:

Private Sub ListIniSectionLines()
    Dim S As String: S = ReadIniSection("c:\windows\win.ini", "MAIL")
    Dim vLines As Variant: vLines = Split(S, Chr$(0))
    Dim vLine As Variant
    For Each vLine In vLines
       Debug.Print vLine
    Next vLine
End Sub

Private Sub ListIniSectionLines()
    Dim S As String: S = ReadIniSection("c:\windows\win.ini", "MAIL")
    Dim vLines As Variant: vLines = Split(S, Chr$(0))
    Dim vLine As Variant
    For Each vLine In vLines
       Debug.Print vLine
    Next vLine
End Sub