[VBA] Errore 35610 Aggiunta Nodo TreeView

[Peppe psp]

Salve a tutti, lavoro con VBA su Access 2003 e sto cercando di implementare una TreeView utilizzando una tabella per i dati.
La tabella contiene tre campi: NodoGenitore, ChiaveNodo, TestoNodo e questo è il codice VBA

Sub addNodes()
    Dim objTree As TreeView
    Dim db As DAO.Database
    Dim rst As DAO.Recordset
    
    Set db = currentDb
    Set rst = db.OpenRecordset("SELECT * FROM Livelli")
    
    Set objTree = Me.xTree.Object
    
    rst.MoveFirst
    Do Until rst.EOF
        If IsNull(rst![NodoGenitore]) Then
            objTree.Nodes.Add , , rst![ChiaveNodo], rst![TestoNodo]
        Else
            objTree.Nodes.Add rst![NodoGenitore], tvwChild, rst![ChiaveNodo], rst![TestoNodo]
        End If
        rst.MoveNext
    Loop
End Sub

Quando tento di aprire la maschera ricevo il fatidico errore 35610 e mi viene evidenziata la riga dopo l'Else, ma non riesco a capire il perchè dell'errore anche perchè in fase di debug i valori assegnati alle variabili sembrano apposto

Grazie