Visual Basic 6 - eseguire più istruzioni in una form

ho creato una form dove ho inserito più istruzioni ognuna diversa dall'altra e devo fare in modo ke si esegua una dopo l'altra...come posso fare???
risp...:

tt le istruzioni vengono eseguite una dopo l' altra...
forse nn ho capito cosa intendi dire
se posti il codice e ti spieghi meglio forse posso aiutarti

Non mi è molto chiaro...magari se puoi fare un esempio..
Comunque (se è questo che vuoi sapere) in un form le istruzioni vengono automaticamente eseguite una dopo l'altra a seconda dell'ordine in cui sono messe (poi certo, se uno lo riempie di "goto"...)

inserisco due semplici codici per l'esempio...

Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long


Private Sub Form_Load()
mciSendString "Set cdaudio door Open", 0, 0, 0 'far aprire il lettore
end sub
beep 44, 4000 'far emettere un beep dopo l'apertura del lettore
End Sub


spero di essere stato chiaro..

La Beep e' sincrona, inizia dopo che e' terminata l'istruzione precedente.

Puoi usare la API PlaySound (alias PlaySoundA) della winmm.dll che puo' lavorare in modalita' asincrona.

Leggi questo articolo:
vbsimple.net/…

innanzitutto qui c'è un errore c'è un end sub di troppo

Private Sub Form_Load()
mciSendString "Set cdaudio door Open", 0, 0, 0 'far aprire il lettore
'leva end sub
beep 44, 4000 'far emettere un beep dopo l'apertura del lettore
End Sub

comunque non ho ben chiaro cosa intendi fare...

forse vuoi creare delle sub con delle istruzioni per esempio cosi:

sub suona()
beep 44, 4000 'far emettere un beep dopo l'apertura del lettore
end sub
sub aprilettore()
mciSendString "Set cdaudio door Open", 0, 0, 0
end sub

e la load del form diviene:

private sub Form1_Load()
aprilettore()
suona()
end sub

nn ho capito cosa intendi.

forse il problema è che senti il suono prima dell' apertura del lettore...
questo avvine xk ci vuole + tempo a far aprire il lettore (ke è un' operazione meccanica) che emettere un suono

in tal caso puoi usare doevents che fa trascorrere il tempo necessario all' esecuzione di un' operazione senza eseguire quella successiva

codice x lettore
doevents
codice x suono

in caso nn funzioni prova così:

private sub timer1_timer()
codice suono
end sub

private sub form_load()
timer1.enabled=false
codice lettore
timer1.enabled=true

l' interval del timer sarà il tempo che interorre tra l' esecuzione dell' apertura del lettore e l' emissione del suono

così cre do funzioni

grazie a tutti!!!