Foxtable(狐表)用户栏目专家坐堂 → [求助]单击单元格按钮弹出的文件管理器窗口的名称是什么(还没解决呢!)?


  共有3408人关注过本帖树形打印复制链接

主题:[求助]单击单元格按钮弹出的文件管理器窗口的名称是什么(还没解决呢!)?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/17 12:05:00 [显示全部帖子]

弄一个计划任务,加入代码,即可看到当前窗口的信息

 

Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
    output.show(frm.name & frm.Text)
End If


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/18 22:15:00 [显示全部帖子]

 你是不能调用的

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/18 23:49:00 [显示全部帖子]

 呃,你可以在计划管理那里,控制其内容的显示嘛。

 

 点击按钮的时候,开始计划,计划开启后,把控件隐藏,然后自己把自己关闭。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/19 19:36:00 [显示全部帖子]

 任务管理器

 

Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
    If frm.Name = Nothing AndAlso frm.Text = "文件管理器" Then
        Dim fm As object = frm.Controls("FileManager").Controls("SplitContainer1").Panel2.Controls("FlowLayoutPanel1")
        fm.Controls("Folder").Visible = False
        'For Each r As object In fm.controls
            'output.show(r.name)
        'Next
    End If
End If


 回到顶部