I have a problem with my about screen. I have rigged it so it currently plays a sound when it loads....Which is fine except that you have to wait until the sound finishes before accessing any of the buttons on that screen.
I want it to work as a normal about screen would...where it plays the sound but you can still access the screen functionality while its playing.
Private Sub Form_Load()
Dim Sound As Long
Me.Caption = "About " & App.Title
lblVersion.Caption = "Version " & App.Major & "." & App.Minor & "." & App.Revision
lblTitle.Caption = App.Title
DoEvents ' Passing time back to CPU..
'Plays a tune when the about screen is opened
Sound = sndPlaySound("The Microsoft Sound.wav", SND_SYNC Or SND_NODEFAULT)