以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于独立窗口  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69260)

--  作者:sara
--  发布时间:2015/6/2 11:48:00
--  关于独立窗口

Vars("AddKeHu") = True
If Forms("客户资料").Opened = True Then
    Vars("IsKeHuOpened") = True
MessageBox.Show("aa")
Else
MessageBox.Show("bb")
    Vars("IsKeHuOpened") = False
  \'  Forms("客户资料").Open
End If

我这段代码导致的结果是什么都不输出,窗口死在那里了,如图,我想判断如果独立窗口打开着的话就不弹出窗口了,把各个控件里面的内容清空,那我该如何判断独立窗口是否已经打开呢


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/6/2 12:09:00
--  
 呃,你设置了窗口置顶,遮住了弹出框。键盘 Alt+F4 关闭
--  作者:sara
--  发布时间:2015/6/2 13:09:00
--  
还是没有弹出框
--  作者:大红袍
--  发布时间:2015/6/2 14:12:00
--  
 呃,你窗口不要设置最顶层好吗?
--  作者:sara
--  发布时间:2015/6/2 15:51:00
--  
不设置最顶层点击下面那个窗口控件时候上面窗口就到了最后面了
--  作者:大红袍
--  发布时间:2015/6/2 15:59:00
--  
以下是引用sara在2015/6/2 15:51:00的发言:
不设置最顶层点击下面那个窗口控件时候上面窗口就到了最后面了

 

1、不设置最顶层,改成模式窗口;

 

2、或者所有的窗口,都不要用模式窗口。


--  作者:sara
--  发布时间:2015/6/2 16:28:00
--  
我在打开窗口时候有这个提示,杂么回事,就是新增,里面
--  作者:大红袍
--  发布时间:2015/6/2 16:29:00
--  

什么提示