| 本月文章推荐 |
利用API函数实现隐藏和显示桌面图标发表日期：2006-2-27
|
|
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-> |
| 上一篇：感悟VB细水长流话API
人气:3415 下一篇：用API函数遍历指定驱动器、目录的文件 人气:2752 |
| 浏览全部Visual Basic的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
