卵巢早衰吃什么保健品:VB 调用和xxx.exe在同一目录下的声音文件xxx.wmv应该怎么表示

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 04:51:15
VB 调用与xxx.exe同一目录下的声音文件xxx.wmv应该怎么表示
同一文件夹下的,谢谢了

调用外部程序只需要用shell函数即可,如果加参数比如象你可能要调用一播放器并且让他播放放在一首歌曲
只需要按照一定的格式来添加参数即可

Shell 函数

执行一个可执行文件,返回一个 Variant (Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。

语法

Shell(pathname[,windowstyle])

Shell 函数的语法含有下面这些命名参数:

部分 描述
pathname 必要参数。Variant (String),要执行的程序名,以及任何必需的参数或命令行变量,可能还包括目录或文件夹,以及驱动器。
Windowstyle 可选参数。Variant (Integer),表示在程序运行时窗口的样式。如果 windowstyle 省略,则程序是以具有焦点的最小化窗口来执行的。

windowstyle 命名参数有以下这些值:

常量 值 描述
vbHide 0 窗口被隐藏,且焦点会移到隐式窗口。
VbNormalFocus 1 窗口具有焦点,且会还原到它原来的大小和位置。
VbMinimizedFocus 2 窗口会以一个具有焦点的图标来显示。
VbMaximizedFocus 3 窗口是一个具有焦点的最大化窗口。
VbNormalNoFocus 4 窗口会被还原到最近使用的大小和位置,而当前活动的窗口仍然保持活动。
VbMinimizedNoFocus 6 窗口会以一个图标来显示。而当前活动的的窗口仍然保持活动。

说明

如果 Shell 函数成功地执行了所要执行的文件,则它会返回程序的任务 ID。任务 ID 是一个唯一的数值,用来指明正在运行的程序。如果 Shell 函数不能打开命名的程序,则会产生错误。

注意 缺省情况下,Shell 函数是以异步方式来执行其它程序的。也就是说,用 Shell 启动的程序可能还没有完成执行过程,就已经执行到 Shell 函数之后的语句。

============================================

Shell 函数示例
本示例使用 Shell 函数来完成一个用户指定的应用程序。

' 将第二个参数值设成 1,可让该程序以正常大小的窗口完成,并且拥有焦点。
Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' 完成Calculator。

shell()

=================================================================

举个白点的例子

Private Sub Command1_Click()
Shell "explorer.exe c:", 1
End Sub

在这里你只要单击一下按钮command1就会用explorer.exe 打开c盘,explorer.exe是windows资源管理器,是你调用的程序,c:是打开explorer的一个参数,你如果加个d:,就会打开d盘
明白了吧

播放声单文件(wav,不是wmv),你所需要的API函数称为PlaySound,以下为该函数的声明:

Public Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVallpszName As String, _
ByValhModule As Long, ByValdwFlags As Long) _
As Long

以下代码播放了DingDong.wav文件中的声音:

PlaySound "xxx.wav", CLng(0), SND_ASYNC Or SND_FILENAME