forowhl 发表于 2010-1-28 22:53:00

怎样让窗体在cad中 自动切换 show的方式

<p>&nbsp; 我添加两个按钮实现，但是这样用的时候有点麻烦，有没有方法是自动识别的，鼠标点到窗体就 Show vbModal 点到autocad程序就Show vbModeless。。</p><p>Private Sub CommandButton6_Click() '切换到程序<br/>&nbsp;&nbsp;&nbsp; LTPT.Hide<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CommandButton7.Visible = True<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CommandButton6.Visible = False<br/>&nbsp;&nbsp;&nbsp; LTPT.Show vbModal&nbsp; <br/>End Sub</p><p>Private Sub CommandButton7_Click() '切换到绘图<br/>&nbsp;&nbsp;&nbsp; LTPT.Hide<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CommandButton6.Visible = True<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CommandButton7.Visible = False<br/>&nbsp;&nbsp;&nbsp; LTPT.Show vbModeless<br/>&nbsp;<br/>End Sub</p>

forowhl 发表于 2010-5-27 22:44:00

知道方法了，在form窗体上添加个<font face="Verdana">AcFocusCtrl</font>控件，form的ShowModal属性改成FALSE就行了。。。

sdwzzy 发表于 2013-10-26 10:24:39

方法很有用，学习了，谢谢楼主分享
页: [1]
查看完整版本: 怎样让窗体在cad中 自动切换 show的方式