一个关于文件二进制码(.wav)的小问题? 是不是wav文件格式不一样,具体格式参见http://www.csdn.net/dev/format 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我估计是你生成的wav文件有问题(size=0).你用下面代码试一试Dim Lfilesize As LongOpen "c:\windows\media\ding.wav" For Binary As #1Lfilesize = LOF(1) - 1'添加如下判断代码If Lfilesize >= 0 Then ReDim waveshuju(Lfilesize) As Byte Get #1, , waveshujuEnd ifClose #1 VBA怎么将execl某个工作表数据导出到txt文件 关于ADODC控件对ACCESS数据库查询问题 如何取得当前网段的计算机列表 求购“客户关系管理”程序。有者请速联系~ SHELL?? 高手请进!VB对光驱内文件名的模糊查询问题。救命,分不够,加!!! 在98下如何设置窗口透明 文件传输问题! 问:800*600下设计的窗口,在1024*768中怎样正常显示,即充满屏幕,每个控件的位置都有相应改变?急! 怎么用vb实现远程登陆sql服务器啊!! 如何实现数据的导出导入 使用SQL2000分析查询器做查询时,报内存不足,但它只使用了2.7GB,我可有4GB耶???
你用下面代码试一试
Dim Lfilesize As Long
Open "c:\windows\media\ding.wav" For Binary As #1
Lfilesize = LOF(1) - 1
'添加如下判断代码
If Lfilesize >= 0 Then
ReDim waveshuju(Lfilesize) As Byte
Get #1, , waveshuju
End if
Close #1