|
阅读：1671回复：4
AO请教返回程序标题
<P>Sub ReportCaption()
Dim pApp As IApplication Set pApp = Application MsgBox pApp.Caption End Sub 为什么我用VB调用AO后运行这段程序时 总提示我说 SET PAPP = APPLICATION要求对象呢？ 有高手告诉我说这个只能在VBA里用 那我如果在二次开发里 怎么才能实现这个功能呢？</P> <P>请高手能否给个最简单的例子就好 ，我现在毫无头绪 </P> |
|
|
1楼#
发布于：2004-10-22 12:16
<P>Dim pApp As IMxApplication
Set pApp = Application</P><P>MsgBox pApp.Caption</P><P>试一下. </P> |
|
|
|
2楼#
发布于：2004-10-24 17:42
如果你的平台是8.3，那么你可以在例子里面找一个Hook.cls，里面写的很详细，如果使用9.0那么有一个接口类好像是叫IHookhelper的，你可以查查看！
|
|
|
3楼#
发布于：2004-12-03 11:11
没有hook当然不行了。你定义了一个iapplication接口。但在VB中用Application 实现，这是错误的。因为这里application指向VB应用程序本生，而不是arcmap应用程序。
|
|
|
4楼#
发布于：2004-12-06 23:26
<P>是这样的。 你要先打开一个 IDocument （mxDocumen)对象， 然后把 这个对象的实例的 parent (也就是Arcmap的IApplication对象), 然后就可以对ArcMap 进行操作了.</P><P>8.3和 9.0都有类似的 例子代码。</P>
|
|
