… = .Graph.InEdges[…] (gb.data)

Dim hGraph As Graph
Dim hGraphInEdges As .Graph.InEdges
hGraphInEdges = hGraph.InEdges [ Vertex As String ]