| 本月文章推荐 |
利用API播放AVI发表日期：2006-2-27
|
|
声明：
DeclareFunctionmciSendStringLib"winmm.dll"Alias"mciSendStringA"(ByVallpstrCommandAsString,ByVallpstrReturnStringAsString,ByValuReturnLength AsLong,ByValhwndCallbackAsLong)AsLong 代码： DimreturnstringAsString FileNameAsString returnstring=Space(127) FileName="C:\A1.avi" erg=mciSendString("open"&Chr$(34)&FileName&Chr$(34)&"typeavivideoaliasvideo",returnstring,127,0) erg=mciSendString("setvideotimeformatms",returnstring,127,0) erg=mciSendString("playvideofrom0",returnstring,127,0) '记着关闭！ erg=mciSendString("closevideo",returnstring,127,0)-> |
| 上一篇：播放资源文件文件中的声音
人气:3757 下一篇：在VB应用程序中恰当的使用声音 人气:4342 |
| 浏览全部Visual Basic的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
