generating Cross Functional Flowcharts with drawing control

[Jon-Olav Hermansen]

Hello All,

I am developing an VB6 application using the Drawing Control. In this
application, i want the user to be able to generate Cross Functional
Flowcharts. I also want to use Visio to handle the functional band management
(reordering with children). To put Visio in the correct state for doing this,
I have to run the addon CFF. This addon displays a dialog asking for a few
parameters.
I currently use the following code to run this addon:

Private Sub RunAddon()
Dim objAddon As Visio.Addon
Set objAddon = visApp.Addons.Item("CFF")

visApp.AlertResponse = 1
objAddon.Run "/S-INIT"
objAddon.Run "/cmd=3"
visApp.AlertResponse = 0
End Sub

This works sometimes, but the behavior of the drawing control after this
addon is unpredictable;
- Sometimes it opens a new stencil with the functional band and a separator.
- Sometimes it causes the program to freeze when clicking on a functional band
- Sometimes the functional bands changes appearance

Does anyone have experience in using this addon?

Is there another way of putting Visio in CFF mode?