设为首页设为首页
 添加收藏添加收藏
 进入音乐版音 乐 版
  汉南在线程序设计VB程序

利用API函数实现隐藏和显示桌面图标
作  者:匿名
关键字:VisualBasic实例



PrivateDeclareFunctionFindWindowLib"user32"Alias"FindWindowA"(ByVallpClassNameAsString,ByVallpWindowNameAsString)AsLong
PrivateDeclareFunctionShowWindowLib"user32"(ByValhwndAsLong,ByValnCmdShowAsLong)AsLong
PrivateConstSW_HIDE=0
PrivateConstSW_RESTORE=9

'隐藏桌面图标
PrivateSubCommand1_Click()
DimHwdAsLong
DimrtnAsLong
Hwd=FindWindow("Progman",vbNullString)
rtn=ShowWindow(Hwd,SW_HIDE)
EndSub

'显示桌面图标
PrivateSubCommand2_Click()
DimHwdAsLong
DimrtnAsLong
Hwd=FindWindow("Progman",vbNullString)
rtn=ShowWindow(Hwd,SW_RESTORE)
EndSub->



来源:网络
阅读:597
日期:2008-1-2

【 双击滚屏 】 【 收藏 】 【 打印 】 【 关闭 】 【 字体: 】 
上一篇:用VB实现“ICQ”式的启动欢迎画面
下一篇:VisualBasic菜单在应用程序中的使用

  >> 相关文章
 
  ·用VB实现“ICQ”式的启动欢迎画面
  ·再谈VB程序的加密
  ·多用户应用程序中应注意的其它问题(1)--多客户环境下VB数据库编程之(8)
  ·VB5实现窗口图像缩放、滚动技巧
  ·用VisualBasic自编小游戏
  ·用VB学做“黑客”程序
  ·多用户应用程序中应注意的其它问题(2)--多客户环境下VB数据库编程之(9)
  ·用VB将命令行软件Windows化
授权使用:汉南在线 http://www.hzwz.net/(2008-2009)   
Copyright (c) 2002-2007 汉南在线. All Rights Reserved . 
经营许可证:陕ICP备05000109号 Powered by:汉南在线