Private Sub Form_Activate()
Me.WindowState = 2
End Sub
Me.WindowState = 2
End Sub
解决方案 »
- 马上结~~~
- VB如何取得windows标准控件上的文字
- VB--文件加密
- 大家帮帮忙,MSchart的三个问题
- 请问怎么把一大堆的图片按照修改日期命名?
- 关于‘select ... into’ 的一个问题
- 请问mschart控件,在横轴显示汉字的时候,如果是竖排,字符就模糊不清的问题?可解决?
- 关于数据库连接:在有几个窗体的程序中,是每个窗体(每个function or sub)都打开单独的ADO connection,还是整个程序中都共用一个Connecti
- 请问怎样在用户将form托动到top为负数时立即反应?一定要用timer吗?有别额办法?解决后加分
- 请教如何判断ACCESS数据库中是否存在某表?谢谢
- progressbar控键有什么属性,应怎么用?
- 如何将一张BMP或JPG图片赋给一个数组保存
If Me.WindowState<>2 Then
Me.WindowState=2
End Sub
Me.WindowState = 2
End Sub你自己试试看再说了
最小化doc 1的化doc 2就是activate了的
不过你的方法局限性比较大,我只是举个例子,MDI子窗体不止两个的,所以
最小化一个后,焦点不一定聚在我想最大化的窗体上。
火山的方法比较好一些。不过还有一个问题:我希望允许用户自己最小化窗体。火山的方法使得那个窗体总在最前了,而且把其它窗体覆盖住了!