Foxtable(狐表)用户栏目专家坐堂 → 关于判断窗口是否已经打开


  共有3800人关注过本帖平板打印复制链接

主题:关于判断窗口是否已经打开

帅哥哟,离线,有人找我吗?
裴保民
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/12/5 21:32:00 [只看该作者]

蓝老师建一个计划任务后在哪调用他呢?

在新计划写了如下代码:
Dim flag As Boolean = False
Dim mf As WinForm.Form = Forms("主窗体")
For Each f As WinForm.Form In forms
    If f.Opened AndAlso f.name <> "主窗体" AndAlso f.name <> "停靠窗体" AndAlso f.name <> "菜单窗体"  Then
        flag = True
        Exit For
    End If
Next
If flag = False AndAlso Forms("主窗体").Opened Then
  Dim lbl As WinForm.Label =mf.Controls("Label1")
    If lbl.left+lbl.width > 0 Then
        lbl.left -= 10
    Else
        lbl.left = mf.width
   End If
    Forms("主窗体").TimerEnabled = True
End If

当打开某一个模式窗体时主窗体的Label1控件没有隐藏,当再次关闭模式窗体时Label1控件不但没有运行反而被隐藏了
[此贴子已经被作者于2017/12/5 21:53:18编辑过]

 回到顶部
总数 41 1 2 3 4 5 下一页