说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB取得 WAV 文件信息

HTML文档下载 WORD文档下载 PDF文档下载
VB取得 WAV 文件信息

WAV 文件基本信息包括如是否立体声,采样频率等。
声明:
Public Const RIFF_ID = 1179011410
Public Const RIFF_WAVE = 1163280727
Public Const RIFF_FMT = 544501094
'Typical header of a simple RIFF WAVE file
Public Type WAVInfo
Riff_Format As Long
chunk_size As Long
ChunkID As Long fmt As Long
Wave_Format As Integer
Channels As Integer '0 = 单声道, 1 = 立体声
SamplesPerSecond As Long
AverageBytesPerSecond As Long '11.025kHz, 22.05kHz, 等
BlockAlign As Integer 'Size of blocks for low level playback
End Type
函数:
Public Function GetWaveInfo(Byval filename As String, Byref w As WAVInfo) _
As Boolean

Dim ff As Integer
ff = FreeFile

On Error GoTo ehandler
Open filename For Binary Access Read As #ff

On Error GoTo ehandler_fo
Get #ff, , w
Close #ff

On Error GoTo ehandler

If w.Riff_Format = RIFF_ID And w.ChunkID = _
RIFF_WAVE And w.fmt = RIFF_FMT Then

GetWaveInfo = True
Else
GetWaveInfo = False
End If

Exit Function

ehandler_fo:
Close #ff
ehandler:
GetWaveInfo = False
End Function

图形的特殊显示效果-Delphi资料 图形整体拉出效果-Delphi资料 一个实用的Delphi屏幕拷贝程序的设计 用Delphi 显示122种图形特效 用Delphi编写DLL实现动态改变分辨率 用Delphi进行OpenGL编程学习心得 用Delphi开发windows95屏幕保护预览程序 用Delphi实现壁纸更换 用DELPHI实现位图显示特技 用DELPHI中Canvas特性开发图形软件 用构件变换法实现动画效果-Delphi资料 在Delphi中使用动态图标 在Delphi中显示Windows图标 在多媒体文件中批量抓取图象-Delphi资料 怎样读出不同格式图形的高和宽-Delphi资料 怎样使用PageUp、PageDown滚动窗体-Delphi资料 怎样制作全透明的窗口-Delphi资料 DELPHI:FormContainer简易手册 Delphi:用FormContainer渐变效果 Delphi4的窗口融合技术 Delphi使用技巧ABC Delphi使用技巧四则 DELPHI中自适应表单的实现 TList的用法-Delphi资料 不规则窗口的实现-Delphi资料 不用标题栏也移动窗体-Delphi资料 窗口建立和关闭时的特效-Delphi资料 窗口中状态行的显示-Delphi资料 动态提示的可视化实现-Delphi资料 动态修改显示器分辨率-Delphi资料 对数据库中的数据进行处理-Delphi资料 代码编辑器的问题。 计论:大家都用什么工具进行数据库的比较? 我高中的班主任 请大家评评理,特别是JAVA版版主! 这样的SQL语句怎么写啊 form切换!VB.net里面如何在语句里调出别的FORM 如何用ADO连接EXCEL数据? 什么是上溯造型? 如何把console.write 输出很多内容保存到文件?thread.join()如何使用? 我想实现像网络蚂蚁那样在IE上点右键,把这个IE中的信息传送给我主程序,现在遇到两个问题! 控件的布局问题? 实例化算不算继承? 急!!!!关于SQL数据堵塞 请大家推荐一下哪个汇编集成环境比较好用?DOS下用什么?WIN下用什么? 向各位请教两个tomcat的问题:(谢谢) 高手请问 拉格朗日算法VB=>BCB 求ASP的字符串比较函数. 找C++BUILDER高手!! 我在做演示光盘,用camtasia录制的屏幕图象,可是在客户的机器上播放不出来,在线等待,解决问题马上揭贴! fastreport如何不进行预览而直接打印! 不使用下拉数据窗口,如何实现输入产品代码即可显示产品名称 大哥救命啊 一个简单问题,在一个Win32 applicaion 中如何使用CString变量! 在线等待! 倒霉!!!平白无故被副总扣了100点! 我高中的班主任 JBuilder的爱好者,请留下您的联系方式!谢谢,让我们共同进步! 未指定默认数据库驱动…… VC中如何添加数据库支持? 栽ejb-jar.xml中部署的Ejb QL怎么和Home接口中声明的查询连接起来,必须以ejbSelect开头吗? 如何通过程序调用荧光笔操作?急,在线等!高分相送啊! 表格宽度 发现我的作文水平如果参加今年高考能得满分(仅限作文) 送100分,JB7+JBoss下,用CMP方式建两个EntityBean,比如DIfsZxx(主键所在实体),DIfsZxxRw(外建所在实体),当两者之间关系设为。。。。 谁能够告诉我所有ACCESS数据类型的英文名字?偶在VB中有用到! 请问如何才能使用asp连接foxpro数据库,使用oledb 启动出现找不到windows\system\service.vbs怎么回事??但进入系统正常,如何去掉??? Datagrid!!! 大家能不能推荐一个免费个人主页啊。 大家来帮我看看PHP连接ACCESS数据库的问题! 大家讨论一下这种软件的开发机制和速度优化机制,有没有可能进入代理内部? 放分拉,关于struts的问题,如何在action类中调用ApplicationResources.properties中的信息!!进者有分!! 如何基于对话框打印表格(比如个人简历)在线给分! 今天刚装了新的内核,所以写出过程供大家参考! 一个急需要解决的问题??? VC下如何接收COM+事件 妈妈,女儿对不起你 jbuilder乱码,在线求解 请教一个有难度的代码,江湖救急啊! 在线等!!! 编写一个短信中心,必须要向服务商拿哪些参数? 简单问题:关于ModifyStyle 大家有遇到这种情况吗:"使用jsp无法实现功能,而要被迫使用servlet"? 拖字怎样换偏旁 如图,正方形ABCD的边长为8,点M在DC上,且DM=2,N是AC上的一动点,则DN+MN的最小值为多少?图片看不清的话点击放大. 时间的流逝速度的单位是什么相对论里说物体运动速度接近光速,时间流逝会变慢,但快慢是形容速度的.用于时间不是说时间的速度变慢了吗.但是时间速度的单位又是什么,不能是普通的速度 eight eges.wang! “思”字和“宜”字可以加哪些偏旁 宇宙中的时间流逝快慢的似乎悖论根据爱因斯坦的广义相对论,当物体以运动的速度越快,衡量其自身的时间就相对流逝得越慢,像极限逼近,也就是说,当物体越接近光速,其时间就会趋近于停止. 求助英语练习题(标题字数不够)第一个:the country life the old man was used to ( )a lot since 2008A,change B,has change C,changing D,changed第二个:(  )this method does not work ,let`s try another.A,though B,until C,bef 1份报纸批发价1.35元,零售价1.5元,张大爷想通过卖报赚到50元,他至少要卖多少份报纸? 时间的流逝事实上是均匀的吗?为什么心理状态会“改变”时间的快慢? 怎么标注拼音中的阴平、阳平、上声、去声? 一种报纸,批发价4.55元,零售价5.50元.张大爷一个月卖着种报,赚了95元.请问,这个月,张大爷卖了多少卷子上的题,已经考过了, 所有维度上的时间流逝速度都相同吗?比如说二维世界的时间与咱们三维世界的时间前进速度相同吗? 尘字换偏旁再组词 一份报纸的批发价是0.25元,零售价是0.5元,叔叔卖报想赚到50元,他至少要卖多少份报纸? 高中数学必修四初相怎么求 一份报纸的批发价是2.35元,零售价是2.5元.小明在星期天卖报赚了30元钱,他卖了多少份报纸? 英语单词(动词)变形时什么时候加ed,什么时候双写加ed?limit 也元音和辅音结尾 ,为什么直接加ed就行了? 对于怎样的反应,改变压强不会影响化学平衡移动,全面一点,书上说是 对于气体体积相等 的反应,但是是指总气体体积,还是什么 白银盘里一青螺这句诗形象地写出了望洞庭什么 百度知道 第23题,帮我解决,急 何勒太太用什么背景音乐好 初一数学评价手册P25第5题帮我 kkkkk 361°的含义nongbuqingchu 何勒翁从英文怎么写? 黑洞是恒星演化的最后阶段,根据有关理论,当一颗恒星衰老时,其中心的燃料(氢)己经被耗尽,在外壳的重压之下,核心开始坍缩,直到最后形成体积小、密度大的星体.如果这一星体的质量超过 不是361°那个. 为什么我用MTT法和CCK-8检测丹参酮ⅡA对细胞的毒性影响,结果两次测出细胞抑制率都是负值呢我分别用MTT法和CCK-8检测丹参酮ⅡA对细胞的毒性影响,结果两次测出细胞抑制率都是负值,就是说 加 1.计算:-6AB*[AB的平方-6A的3次方B]=[ ]2.观察下列各式:1.5的平方-1=4[2*1+4],2.6的平方-4=4[2*2+4] 3.7的平方-9=4[2*3+4] 4.8的平方-16=4[2*4+4],...将你观察到的规律用含有字母N的等式表示应是[ ]其中N为整数.3. 361°是什么意思 某同学患了小肠炎,医生在他的上静脉输液,药物到达患处所经过的路径是怎样的? 英语翻译一定要全!1 A与B成反比例,B与C也成反比例,那么A与C成( )比例 一道正方形几何题,帮忙啊已知正方形ABCD中,E是CD中点,F是AD中点,联结BE,CF相交于P,联结AP,求证AP=AB. 尘字能换什么偏旁再组词 两个字请教:宝盖头下面一个契;天涯的涯去掉三点水. 一道初二的正方形几何题.如图,正方形ABCD中,CE=MN,∠MCE=35°,那么∠ANM是多少度? xing ( )高 看拼音写汉字 尘怎么组词 361°是什么意思 气象万千、风云变幻、奇峰异岭、若隐若现、腾云驾雾、飘飘欲仙、白云苍狗、瞬息万变 的意思 宋书 列传第三十一王僧绰,琅邪临沂人,左光禄大夫昙首子也.幼有大成之度,弱年众以国器许之.好学有理思,练悉朝典.年十三,太祖引见,下拜便流涕哽咽,上亦悲不自胜.袭封豫章县侯,尚太祖长女 选项 A 成正比例 B 成反比例 C 不成比例如果X和Y互为倒数,那么X和Y( ).平行四边形面积一定,它的底和高( ).圆锥的底面积一定,高和体积( ).分子一定,分母与分数值( ).7:X=5:Y,X与Y( 有什么英文单词发“wang”和“xing”这个音的?或是组合起来的,本人起英文名字哦.. 三条直线ax+2y+8=0,4x+3y=10,2x-y=10,能围成一个三角形,a的取值范围? 谁有动物卫生监督执法群,我要加入? 气象万千,风云变幻,奇峰异岭,若隐若现,腾云驾雾,飘飘欲仙,白云苍狗,瞬息万变,选其中的两三个词语写一段话. 1份报纸批发价1.35元,零售价1.5元,张大爷星期天卖里30元,他卖多少份报纸? 隋文帝措施对历史进程影响最大的是 请英语高手帮我取两个英文名?wang xing,最好和中文有斜音,然后中文意思像男孩子,好读! 为了巩固新生的苏维埃政权,苏维埃政府在对外关系上采取了什么措施 隋文帝治理的措施 名字带奎字什么意思 在课文 把铁路修道拉萨去 中巍峨一词怎样解释 隋文帝统治时期史称000 “奎”字的意思?是不是可以是皇帝的意思. 思加什么偏旁组成什么字 隋文帝统治时期,经济繁荣,史称___? a.b为不等正实数,a方-b方=a立方-b立方证a+b大于1相当相当难 如图,正方形ABCD中,点E在边AB上,EC交BD于点M,过M作MF⊥EC交AD于F点,M为垂足,且AE=nEB,问若n=2时,则AF/FD=?图: 时间的流逝速度与什么有关? 福州旅游局官微骂记者 专家:官微亟需直击“机动-5号”实兵演习:势均力敌朝鲜完成军方人事布局 举行2万人连级人社部:机关事业单位将建职业年金海军三大舰队首次在西太平洋预定海区展杭州临安警方破获特大涉毒涉枪案 缴获德国高层代表团将赴美 跟进默克尔被窃世界最高大狗去世 站立高度达2.2米新航停飞新加坡-纽约航线 史上最长航南亚6.75亿人仍露天排便杭州市领导为杭州国内经济合作洽谈会“旧金山瞄上中国投资者多米尼加时装周 “眼睛姐”秀“电眼”非洲何时“粮食自主”?金价年内仍会维持短期强势中俄联手经贸升级版中新广州知识城主题推介会在新加坡举行世界最高大狗去世 站立高度达2.2米世界浙商大会召开执委会会议 王辉忠出记者称卡扎菲曾绑架强奸数十名女子并性前美国国安局长“私聊”遭“直播”三亚首届疍家斯科拉里不满巴西球员状态端午卖了700万晒晒三导师抢了些啥人国企老总挪用贪污公款注销超标电动车看这里三亚重拳治理恒大天街推出全临街商铺乐在新国 童趣无限亲子游成东环铁出行主力为福利院孩子送温暖让冯导看不够“快乐动起来”启动神曲《小苹果》过耳不忘海口明年将完成土地确权颁证造成一死一伤西班牙国王宣布退位红色战车威信飞虎三连胜巴西世界杯承诺成笑柄“忧欢派对”欢欢自杀阵雨有望送清凉
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘