以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  一个共有窗口,我已经设置为自动隐藏,代码怎么显示它呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=132856)

--  作者:fntfgz
--  发布时间:2019/3/31 17:59:00
--  一个共有窗口,我已经设置为自动隐藏,代码怎么显示它呢?
 一个共有窗口,我已经设置为自动隐藏,我是想判断一下,如果它已经隐藏,就用代码显示,老师怎么写呢?
--  作者:有点甜
--  发布时间:2019/4/1 9:31:00
--  

方法一

 

Dim frm = forms("导航窗口").panel.parent.parent
try
    frm.AutoHiding = True
catch ex As exception
   
End try

 

方法二

 

 

Dim frm = forms("导航窗口").panel.parent.parent
If frm.Gettype.name = "bv" Then
    CurrentTable.Focus
Else
    frm.AutoHiding = True
End If