微软核心模块shell32.dll的应用
来源:互联网 发布:linux etc profile 编辑:程序博客网 时间:2024/06/05 10:57
没有想到shell32.dll还隐藏着很多实用的功能函数,比如打开文件夹,查找电脑,最小化所有窗体等等,这个shell32.dll既是一个标准的COM,还是一个可以作为普通的DLL进行函数引用。
'*************************************************************************
'**模 块 名:frmDemo
'**说 明:YFsoft 版权所有2006 - 2007(C)
'**创 建 人:叶帆
'**日 期:2006-08-29 10:55:17
'**修 改 人:
'**日 期:
'**描 述:微软核心模块shell32.dll的应用
'**版 本:V1.0.0
'*************************************************************************
Option Explicit
Dim MsShell As New Shell
'*************************************************************************
'**函 数 名:cmdTest_Click
'**输 入:Index(Integer) -
'**输 出:无
'**功能描述:
'**全局变量:
'**调用模块:
'**作 者:叶帆
'**日 期:2006-08-29 10:55:19
'**修 改 人:
'**日 期:
'**版 本:V1.0.0
'*************************************************************************
Private Sub cmdTest_Click(Index As Integer)
On Error GoTo ToExit '打开错误陷阱
'------------------------------------------------
Select Case Index
'------------------------------------------------
Case 0: '查找电脑
MsShell.FindComputer
Case 1: '文件运行
MsShell.FileRun
Case 2: '查找文件夹
MsgBox MsShell.BrowseForFolder(Me.hWnd, "查找文件夹", 0).Title
Case 3: '层叠窗口
MsShell.CascadeWindows
Case 4: '查找文件
MsShell.FindFiles
Case 5: 'Windows帮助
MsShell.Help
Case 6: '窗口最小化
MsShell.MinimizeAll
Case 7: '恢复最小化
MsShell.UndoMinimizeALL
Case 8: '打开文件
MsShell.Open ("c:windows otepad.exe")
Case 9: '设置时间
MsShell.SetTime
Case 10: '关闭计算机
MsShell.ShutdownWindows
Case 11: '水平窗口
MsShell.TileHorizontally
Case 12: '垂直窗口
MsShell.TileVertically
Case 13: '路径名称
MsgBox MsShell.NameSpace("c:windowssystem32").Title
End Select
'------------------------------------------------
Exit Sub
'----------------
ToExit:
MsgBox Err.Description
End Sub
'**模 块 名:frmDemo
'**说 明:YFsoft 版权所有2006 - 2007(C)
'**创 建 人:叶帆
'**日 期:2006-08-29 10:55:17
'**修 改 人:
'**日 期:
'**描 述:微软核心模块shell32.dll的应用
'**版 本:V1.0.0
'*************************************************************************
Option Explicit
Dim MsShell As New Shell
'*************************************************************************
'**函 数 名:cmdTest_Click
'**输 入:Index(Integer) -
'**输 出:无
'**功能描述:
'**全局变量:
'**调用模块:
'**作 者:叶帆
'**日 期:2006-08-29 10:55:19
'**修 改 人:
'**日 期:
'**版 本:V1.0.0
'*************************************************************************
Private Sub cmdTest_Click(Index As Integer)
On Error GoTo ToExit '打开错误陷阱
'------------------------------------------------
Select Case Index
'------------------------------------------------
Case 0: '查找电脑
MsShell.FindComputer
Case 1: '文件运行
MsShell.FileRun
Case 2: '查找文件夹
MsgBox MsShell.BrowseForFolder(Me.hWnd, "查找文件夹", 0).Title
Case 3: '层叠窗口
MsShell.CascadeWindows
Case 4: '查找文件
MsShell.FindFiles
Case 5: 'Windows帮助
MsShell.Help
Case 6: '窗口最小化
MsShell.MinimizeAll
Case 7: '恢复最小化
MsShell.UndoMinimizeALL
Case 8: '打开文件
MsShell.Open ("c:windows otepad.exe")
Case 9: '设置时间
MsShell.SetTime
Case 10: '关闭计算机
MsShell.ShutdownWindows
Case 11: '水平窗口
MsShell.TileHorizontally
Case 12: '垂直窗口
MsShell.TileVertically
Case 13: '路径名称
MsgBox MsShell.NameSpace("c:windowssystem32").Title
End Select
'------------------------------------------------
Exit Sub
'----------------
ToExit:
MsgBox Err.Description
End Sub
- 微软核心模块shell32.dll的应用
- 微软核心模块shell32.dll的应用
- 微软核心模块shell32.dll的应用
- 微软核心模块shell32.dll的应用
- 用rundll32调用shell32.dll的资源
- Shell32.Dll API New Published!
- shell32.dll占用了windows系统DLL保存的地址空间而产生了错误
- U盘病毒及其相关资源的分析(patch shell32.dll)
- 系统资源调用和shell32.dll简介
- 从 Shell32.dll 中载入图标
- 使用shell32.dll获取浏览器相关信息
- regsvr32 /s c:\windows\system32\shell32.dll
- NodeJs的核心模块
- spring的核心模块
- xp下的资源管理器界面上的前进后退等图标保持在系统哪里?shell32.dll里没有。
- C#通过Shell32.dll禁用或启用网卡
- Windows Shell library (SHELL32.DLL) is too old!
- Qt核心模块的组成
- 在程序中用什么方法获取平台类型?
- 苹果电脑创始人乔布斯:讲三个我自己的故事
- Jscript打开新窗体显示连接
- 如何利用DBMS_SQL包和游标计算当前用户下所有表的行数?
- .NET 事件模型教程(一)
- 微软核心模块shell32.dll的应用
- 颜色预警实例
- C#典型异常(1)的解决办法
- 为什么打开项目里的某些ASPX文件会使CPU100%
- 博弈论 囚徒理论
- java中的值传递
- ArcGIS Server常见问题
- ArcGis Server开发Web GIS新手体验
- mysql的is there 问题