admin 管理员组

文章数量: 887021


2024年2月23日发(作者：autoupdate是什么意思中文)

示例代码：

1． 打开记事本

Private Sub Command1_Click()

Shell "Notepad E:¥VB练习¥添加DTPicker控件.txt ",

vbNormalFocus

End Sub

注：NotePad后有空格

2． 打开QQ登陆界面

Private Sub Command2_Click()

Shell "D:¥Program Files¥Tencent¥QQ2009¥Bin¥",

vbNormalFocus

End Sub

3． 打开Word文档

Private Sub Command3_Click(Index As Integer)

Dim strDir As String

strDir = "E:¥VB练习¥"

Select Case Index

Case 0

Shell "C:¥Program Files¥Microsoft

Office¥OFFICE11¥ " & strDir, vbHide

Case 1

Shell "C:¥Program Files¥Microsoft

Office¥OFFICE11¥ " & strDir, vbNormalFocus

Case 2

Shell "C:¥Program Files¥Microsoft

Office¥OFFICE11¥ " & strDir, vbMinimizedNoFocus

Case 3

Shell "C:¥Program Files¥Microsoft

Office¥OFFICE11¥ " & strDir, vbNormalNoFocus

Case 4

Shell "C:¥Program Files¥Microsoft

Office¥OFFICE11¥ " & strDir, vbMaximizedFocus

End Select

End Sub

注：C:¥Program Files¥Microsoft Office¥OFFICE11¥之后有空格

* 在开始->运行里面能执行的命令用shell函数也行

Shell的语法：Shell(PathName[，WindowStyle])。

PathName为必需参数。类型为String，它指出了要执行的程序名，以及任何需要的参数或命令行变量，也可以包括路径名。

WindowStyle为可选参数。Integer类型，指定在程序运行时窗口的样式。WindowStyle有以下这些值。

常量 值 描述

VbHide 0 窗口被隐藏，且焦点会移到隐式窗口。

VbNormalFocus 1 窗口具有焦点，且会还原到它原来的大小和位置。

VbMinimizedFocus 2 窗口会以一个具有焦点的图标来显示（缺省值）。

VbMaximizedFocus 3 窗口是一个具有焦点的最大化窗口。

VbNormalNoFocus 4 窗口会被还原到最近使用的大小和位置，而当前活动的窗口仍然保持活动。

VbMinimizedNoFocus 6 窗口会以一个图标来显示，而当前活动的窗口仍然保持活动。


本文标签： 焦点 参数 打开

版权声明：本文标题：VB Shell函数用法 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.freenas.com.cn/free/1708651947h528746.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。