代码搜索:mciSendString

找到约 278 项符合「mciSendString」的源代码

代码结果 278
www.eeworm.com/read/151211/12227432

txt 43.txt

控制光驱门的开关 利用MCI的方法可以方便的实现光驱门的开关。 请看下例: >>步骤1----建立新工程,在窗体上放置一个CommandButton按钮.设置其Caption = "打开" >>步骤2----编写如下代码: Private Declare Function mciSendString Lib "winmm.dll" Alias _ "mciSen
www.eeworm.com/read/151211/12228184

txt 63(1).txt

用API播放 .wav 声音文件 利用多媒体的 mciSendString API 函数, 再搭配 mci(multimedia control interface) 指令, 即可播放 .wav 声音文件, 细节如下: 1. API 的声明: Private Declare Function mciSendString Lib "winmm.dll" Alias " mciSend
www.eeworm.com/read/151211/12228238

txt 94.txt

在VB中用API实现多媒体 作者:秦嘉   在VB中用API实现多媒体主要是调用Windows的mmsystem.dll库。 以下为调用API的声明(这些代码放在程序的声明部分中): 1.′播放CD和AVI所需要的声明。   Declare Function mciSendString Lib ″MMSYSTEM″(ByVal lpstrCommand as String,
www.eeworm.com/read/151211/12228250

txt 20(1).txt

播放 AVI 声明: Declare Function mciSendString Lib "winmm.dll" Alias _ "mciSendStringA" (ByVal lpstrCommand As String, ByVal _ lpstrReturnString As String, ByVal uReturnLength _ As Long, ByVal hwndCa
www.eeworm.com/read/151211/12228324

txt 64(1).txt

用MCI指令进行多媒体编程    我们有时会希望为自己的程序增加音效,例如警告声等,这就需要播放WAV文件。较简单的做法,我们可以使用多媒体控件(VB和Delphi都提供了MCI控件)来完成,但这样做无疑会增加系统负担和使程序体积增大(使用OCX的话尤其明显)。如果我们的程序并非一个多媒体程序而仅仅是用来播放音效的话,就更不划算了。有没有更理想的方法呢?答案是肯定的,Windows ...
www.eeworm.com/read/151211/12229786

txt 76.txt

在VB中用API实现多媒体 秦嘉   在VB中用API实现多媒体主要是调用Windows的mmsystem.dll库。以下为调用API的声明(这些代码放在程序的声明部分中): 1. '播放CD和AVI所需要的声明。   Declare Function mciSendString Lib "MMSYSTEM"(ByVal lpstrCommand _     as
www.eeworm.com/read/151211/12229867

txt 26.txt

打开/关闭光驱门 声明 Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndC
www.eeworm.com/read/149542/12366121

frm bgsound.frm

VERSION 5.00 Begin VB.Form Form1 Caption = "播放MIDI" ClientHeight = 4425 ClientLeft = 1140 ClientTop = 1545 ClientWidth = 5535 LinkTopic
www.eeworm.com/read/126912/14395813

bas userfunction.bas

Attribute VB_Name = "mduUserFunction" Public Function PlayMidiFile(ByVal FileName As String, Optional ByVal Alias As String = "MyMid") As Boolean Dim nRet As Long Dim S As String, ShortPath
www.eeworm.com/read/123326/14637342

bas pf.bas

Attribute VB_Name = "pf" Option Explicit Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uRetur