Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何用代码返回桌面，不是打开桌面地址


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

主题：如何用代码返回桌面，不是打开桌面地址
帅哥哟，离线，有人找我吗？
有点甜
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2019/5/10 12:24:00 [显示全部帖子]

以下是引用漂亮美眉vszh在2019/5/10 12:03:00的发言：
老师，我能把这个代码写在软件最小化时执行吗？没找到这个事件~~

 

全局代码

 

Public  Sub Form2_SizeChanged(sender As Object, e As EventArgs)
    If sender.windowstate = 1 then
        msgbox(123)
    End If
End Sub

afteropenproject事件

AddHandler basemainform.SizeChanged, AddressOf Form2_SizeChanged
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2019/5/12 21:23:00 [显示全部帖子]

检测是否写了下面的禁用代码

 

basemainform.minimizebox = False

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2019/5/13 17:42:00 [显示全部帖子]

以下是引用漂亮美眉vszh在2019/5/13 17:39:00的发言：
嗯，是写了这句造成了；
老师，最上面打开桌面的代码，有时会打不开桌面，有时能打开；经过反复测试，发现程序开多了就打不开，有没啥办法优化下~~~

 

在打开程序多的时候(功能无效的时候)，单独执行这个代码，是否正常？

 

Dim oleType = Type.GetTypeFromProgID("Shell.Application")
Dim oleObject = System.Activator.CreateInstance(oleType)
oleType.InvokeMember("ToggleDesktop", Reflection.BindingFlags.InvokeMethod, Nothing, oleObject, Nothing)
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2019/5/16 8:32:00 [显示全部帖子]

以下是引用漂亮美眉vszh在2019/5/16 8:20:00的发言：
单独执行代码正常

 

那肯定是你把代码用得不正常。请做一个实例发上来测试，并说明测试步骤。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 5 次数据查询