求vb调用visio编程的例子

[thelostland]

同上

[xfzzf]

~顶
不过我不太清楚

[thelostland]

怎么没人理我啊

[ryuginka]

如果你机器上安装了visio,直接在程序中打开
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long

Private Sub Command1_Click()
WinExec "visio主程序名 " & " visio的文件名", 10
End Sub

[ryuginka]

如果你机器上安装了visio,直接在程序中打开
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long

Private Sub Command1_Click()
WinExec "visio主程序名 " & " visio的文件名", 10
End Sub

[thelostland]

我不是说打开visio,打开visio的话，
dim visio as new visio.application
visio.open .....
就行了
我要得编程的例子，谢谢