несоответствие типов при назначении значений словаря сценариев массиву - PullRequest
Новая
       34

несоответствие типов при назначении значений словаря сценариев массиву

0 голосов
/ 05 марта 2019

Привет, все это, вероятно, простая синтаксическая ошибка, но я пытаюсь использовать массив вариантов / строк, хранящийся в словаре сценариев (раннее связывание).Я пробовал несколько методов (перемещение его в массив tmp с помощью ключа и вызов значений прямо из словаря с помощью ключа).

Цель состоит в том, чтобы заполнить древовидный список в форме с заголовками из выбранных текстовых файлов.пользователем.Нет проблем при присвоении значений словарю или использовании ключей в качестве родительского для списка.

Private Sub UserForm_Activate()
    Dim varKey As Variant
    Dim tmpVals() As Variant
    Dim i As Long
    Dim tmpStr As String

For Each varKey In dictFhdrs.keys()

Debug.Print Len(varKey)
   tmpStr = Right(varKey, Len(varKey) - InStrRev(varKey, "\", -1, vbTextCompare) - 1)
   TreeView1.Nodes.Add Key:=varKey, Text:=tmpStr



   tmpVals = dictFhdrs(varKey) 'error here




    For i = LBound(tmpVals) To UBound(tmpVals)
        TreeView1.Nodes.Add varKey, tvwChild, CStr(varKey & tmpVals(i)), CStr(tmpVals(i))

    Next

Next End Sub

...