aktionen nach frmAufruf
ray
ich rufe eine UF auf: im code dieser frm steht:
Private Sub UserForm_Initialize()
Application.Run "LautAn"
End Sub
im modul LautAn steht
Option Explicit
Private Declare Function Ton& Lib "kernel32" _
Alias "Beep" _
(ByVal dwFrequenz As Long, _
ByVal dwDauer As Long)
Sub LautAn()
'Application.Wait (Now + TimeSerial(0, 0, 2))
Ton 500, 500
Ton 1000, 500
Ton 1500, 500
Ton 2500, 1500
Frage/Problem:
LautAn läuft zuerst und dann erst wird die frm angezeigt.
die frm rufe ich auf mit HelpC.show
Weiß jem warum ich erst höre und dann sehe?
Application.wait ändert nix an der Reihenfolge hören/sehen
Gruß Ray
Anzeige