Quick question about Visual Basic!

[Metalmurphy]

Anyof u guys know how to declair a variable so we can use it in diff forms? Kinda stuck here and need some help

Thks in advanced!

[Kirby]

Don't you use the global variable?

Private strExample As String

But I only think that applied to the current form. Other than that, I think you can't have 1 variable declared to all the forms at once.

[Chrono Archangel]

make a Module and declare it Public

Public Variable as Integer

And in properties change your start form to the Module

and in the module put

Sub Main()

Application.Run(New MainForm)

End Sub

//MainForm being the form you want to start with

[Metalmurphy]

Well i rememberd that i didnt use any modules last time i did it! I just had to initialize the variable some way and they i only need to put <formname>.<variable>! Thks anyway

[kairi00]

Declare the variable as "public" at the beginning of the form.

Public strVal As String

Then you can access it by using formname.strVal

[Chrono Archangel]

yup like Kairi00 a said. thats how you can access then via fromain.variable
ive always worked with modules since its easier to know where the global variables are and it saves me from always writing formname. (usefull when you need to access alot the variables from alot of forms)

[Metalmurphy]

Aye thats it! Thks guys

[Metalmurphy]

Ok guys i have a new problem I used a module to declare the Win32 function "sndPlaySound" like this:

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

then whenever i wanted to play a sound i would call the function like this:

sndPlaySound App.Path & "\soms\tiro.wav", SND_ASYNC


The sound does play, however it stops the program untill the sound is finished. Is there anyway to play a sound in the background without freezing the program?

And another thing... anyof you know how to play a MIDI file in VB

[Chrono Archangel]

Originally Posted by Metalmurphy

Ok guys i have a new problem I used a module to declare the Win32 function "sndPlaySound" like this:

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

then whenever i wanted to play a sound i would call the function like this:

sndPlaySound App.Path & "\soms\tiro.wav", SND_ASYNC


The sound does play, however it stops the program untill the sound is finished. Is there anyway to play a sound in the background without freezing the program?

And another thing... anyof you know how to play a MIDI file in VB

havent made mouch test yet but you can try this for MidiFiles.

[Metalmurphy]

Thks for the help Chrono Archangel but that code only seems to work in VB.net! Im using VB 6.0! :/

*edit* I was able to play the midi file same way as used with the wave file... however samething happens! While the music is playing the program freezes!

[jaydawg]

You need to play the sound asynchronously, meaning along with everything else. Do it like this
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Const SND_ASYNC = &amp;H1
Const SND_NODEFAULT = &amp;H2

Private Sub Command1_Click()
sndPlaySound "mysound.wav", SND_ASYNC Or SND_NODEFAULT
End Sub


Also you could always just use the "Do Events" tag but that is annoying to a degree and much easier to just set up the sound to sync at the inital.

[Metalmurphy]

Thks jaydawg but i already saw it in a vb tutorial page! Thks anyway

Trying to figure out how to work with files now to save high-scores and stuff like that! But i think this website covers that!