Search Tools Links Login

A program that reads a wave file and displays its wave sample and formats (ie. 22050 Hertz, 16-bits)


Visual Basic 6, or VB Classic

This is an update of the 'Read a wave file' code that I have submitted a couple of years ago. The old code does not read a wave file in a correct way, and I feel that it does not provide enough helps. Therefore, I used the correct way to read the wave file in this project. This program demonstrates how to read a wave file and displays the wave samples (If there is more than one channel i.e. Stereo, it will display those two channels separately. See Screenshots), Samples rates per second (i.e. Hertz), Average bytes per second (How many bytes play every second), Bits per sample (Bit resolution of a sample point. i.e. 16-bits) and the length of the wave file in terms of seconds. The program also allows the user to enlarge a specific section of the wave file (See Screenshots). When the user plays the wave file, he or she will be able to see a line that indicates the byte that is being play (See Screenshots). THIS PROGRAM IS A MUST SEE! Feel free to leave any comments and questions.

Original Author: Altis

Side Effects

No Side Effects

API Declarations

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Public Enum sndConst
SND_ASYNC = &H1 ' play asynchronously
snd_loop = &H8 ' loop the sound until Next sndPlaySound
SND_MEMORY = &H4 ' lpszSoundName points To a memory file
SND_NODEFAULT = &H2 ' silence Not default, If sound not found
SND_NOSTOP = &H10 ' don't stop any currently playing sound
SND_SYNC = &H0 ' play synchronously (default), halts prog use till done playing
End Enum

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 116 times

Categories

Visual Basic 6

Attachments

A program 249378192001.zip
Posted: 9/3/2020 3:45:00 PM
Size: 79,262 bytes


Loading Comments ...

Comments

No comments have been added for this post.

You must be logged in to make a comment.