我正在尝试针对 Visio 2013 测试我们的应用程序,但遇到的问题会在 Visio 2013 Preview 中引发消息“Microsoft Office 无法验证此产品的许可证。您应该使用控制面板修复 Office 程序”。
我有一个简单的 VB6 表单,上面有一个按钮。在按钮事件处理程序中,我有以下代码。
Private Sub Command3_Click()
Dim visoObj As Visio.Application
Set visoObj = New Visio.Application
visoObj.Visible = True
End Sub
单击时,会打开 Visio 应用程序,但会打开消息“Microsoft Office 无法验证此产品的许可证。您应该使用控制面板修复 Office 程序”。
我已检查产品是否已激活并尝试从添加/删除程序中卸载/重新安装/修复/重新输入密钥。
我也试过
cscript ospp.vbs /act
有人让 VB6 和 Visio 2013 预览版工作吗?
如果您尝试将 Visio 2013 绘图控件添加到 VB6 表单,您也会收到此消息。
我也成功地尝试了类似的代码来打开 Word 2013 Preview 和 Excel 2013 Preview。这工作得很好。只是无法弄清楚 Visio 出了什么问题。
有什么帮助吗?