sharksun 发表于 2005-7-20 20:32:00

如何获得焦点并显示在最前

在excel vba中控制cad过程中，隐藏窗口后（此时最前窗口为excel工作表），需要将焦点转到cad程序。（例如在acad里插入一个点）
这时，如果cad最小化于任务栏中，则用application.winstate＝max可以获得焦点并置前。
问题是当acad已经最大化时，如何用代码使之获得焦点并置前呢？（不隐藏excel）
多谢指教。

洋葱老爹 发表于 2005-7-21 14:10:00

很简单的,只须添加一行:
AppActivate ThisDrawing.Application.Caption   '切换到CAD绘图状态

my_computer 发表于 2005-7-22 10:37:00

置前可以使用api函数的 setwindowsposition
页: [1]
查看完整版本: 如何获得焦点并显示在最前