getting the name of a roww in the geometry section with visual basic

[françois]

I'm using VB 6 and have succeeded in getting the attributes of the
geometry section in the shapesheet but failed wit the name of the row
of this section which must define the basic shape (ellipse, moveto,
arcto...)

Thanks for your help

 

[JuneTheSecond]

Debug.Print shp.RowType(visSectionFirstComponent, 1)
prints integer that stand for the type of the first row.
Number 1 is the number at most left of the first geometry section.
If the first row is named as "MoveTo", it prints 138.
The row types are listed in the VisRowTags constants in the Visio help.