WAV in VB

Thread View: alt.lang.basic

2 messages

[T] Back to Threads [V] Tree View [G] Group Articles

2 total messages Started by John Strong Fri, 06 Nov 1992 12:42

#200

Author: John Strong
Date: Fri, 06 Nov 1992 12:42

9 lines
727 bytes

Hi,
   Can someone please repost the code to play .WAV files in Visual BASIC in
Windows 3.1?  Thanks!


-- 
John Strong                 |"My mother never breast fed me.  She told me that
strong@minerva.cis.yale.edu | she only liked me as a friend."                 
Yale University             |                             - Rodney Dangerfield

Re: WAV in VB

#232

Author: Galen Raben
Date: Mon, 09 Nov 1992 16:24

20 lines
970 bytes

In alt.lang.basic, strong-john@yale.edu (John Strong) writes:

>Hi,
>   Can someone please repost the code to play .WAV files in Visual BASIC in
>Windows 3.1?  Thanks!

Here it is again... 

In the global module declare the API function:

Declare Function sndPlaySound Lib "MMsystem" (ByVal lpSound As String, ByVal Flags As Integer) As Integer

Global Const SND_SYNC = 0      'play synchronously (default)
Global Const SND_ASYNC = 1     'play asynchronously

In your program simply put:

Result% = SndPlaySound("TADA.WAV", SND_ASYNC)

- Galen -

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads