Hi
How can I change the font size for text on an imported VISIO shape?

Here is how I change the text:


For i2 = 0 To NumFlowChartShapes(0)
Dim item As DiagramItem = diag.Items(i2)
item.ToolTip = "Shape# " & Str(i2)

If TypeOf item Is ShapeNode Then
Dim shape As ShapeNode = CType(item, ShapeNode)
shape.Text = "Shape# " & Str(i2)
End If
Next


Thanks,
Jim

Thanks - that worked for the text in the shapes, but not for the text on the connectors.  How can I change that text?

Thanks
Jim

Thanks, that worked.  In the .vb code at load, I just set all the fonts:

       Me.view.Diagram.Font = New Font("Microsoft Sans Serif", 8)

Just to let you know.  When I used Windows Forms, I did not have set the font size, it seemed to either read it from the VISIO file, or had a default font size of "8".  However, when I moved to WPF, the default size changed to "3". Or at least it appears that is what happened.

Anyway, I am all set now.
Thanks
Jim