从品牌网站建设到网络营销策划,从策略到执行的一站式服务
显示桌面的本质是个系统 Shell(IShellDispatch4.ToggleDesktop()),所以只需要调用这个 Shell 就好了,用不着模拟按键。
创新互联公司专注为客户提供全方位的互联网综合服务,包含不限于成都网站建设、网站设计、新蔡网络推广、小程序制作、新蔡网络营销、新蔡企业策划、新蔡品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;创新互联公司为所有大学生创业者提供新蔡建站搭建服务,24小时服务热线:18982081108,官方网址:www.cdcxhl.com
项目引用 C:\Windows\System32\shell32.dll,参考代码:
Dim objShel As Shell32.ShellClass = New Shell32.ShellClass()
CType(objShel, Shell32.IShellDispatch4).ToggleDesktop()
新建一个Sub : Main
Private Sub Main()
xxx.show 'xxx指启动窗体
'载入图片、数据库之类的
Unload xxx
{from}.show '{from}指主界面
End Sub
然后在工程-属性将"Main"作为启动对象
me.dispose()
楼主针对这个问题我也纠结过很久不过就在刚刚我找到了问题所在:
还是用me.close()
打开
项目
》
最下面一行有一个属性》
应用程序》下面
有一个关机模式
改为:当最后一个窗体关闭时。。。注意
me.close要写在窗体show()后面
例如
写成
f2.show()
me.close()
不要写成
me.close()
f2.show()
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图