网页功能: 加入收藏 设为首页 网站搜索  
系统是否支持声音
发表日期:2003-07-21作者:[] 出处:  

声明:

Declare Function waveOutGetNumDevs Lib "winmm.dll" Alias "waveOutGetNumDevs" () As Long

例子:

Dim i As Integer

i = waveOutGetNumDevs()

If i > 0 Then

MsgBox "系统安装声卡"

Else

MsgBox "系统无声音卡"

End If

我来说两句】 【加入收藏】 【返加顶部】 【打印本页】 【关闭窗口
中搜索 系统是否支持声音
本类热点文章
  shell函数能以同步方式打开一个exe文件
  shell函数能以同步方式打开一个exe文件
  揭穿号称内存占用极低的软件的诡计
  用VB6实现真正实用的多线程处理
  读写INI文件的四个函数
  VB的API编程精粹
  VB的API编程精粹
  TAPI笔记
  TAPI笔记
  巧用API函数增强VB位操作功能
  锁定计算机
  锁定计算机
最新分类信息我要发布 
最新招聘信息

关于我们 / 合作推广 / 给我留言 / 版权举报 / 意见建议 / 广告投放  
Copyright ©2003-2022 Lihuasoft.net webmaster(at)lihuasoft.net
网站编程QQ群   京ICP备05001064号 页面生成时间:0.00362