VB 6.0: Cursor auf Sanduhr setzen ?

Hallo Leute,

ich würde gerne in meiner Anwendung den Standard-Cursor auf
eine Sanduhr setzen. Für diese Zeit sollen alle Mausklicks
innerhalb der Anwendung ignoriert werden.

Kann mir jemand sagen wie ich das mache.

Vielen Dank schon im voraus.

Gruß

Thomas

Screen.MousePointer = vbHourglass
'setzen der Maus auf Sanduhr, für die ganze Application

oder

Me.MousePointer = vbHourglass
'setzen der Maus auf Sanduhr, nur für dieses eine Form

Me.Enabled = False
'wenn Mausklicks ingnoriert werden sollen (nur Form), dann diese „Disablen“

greets from michL (vienna)

PS: mit „.MousePointer = vbNormal“ setzt man die Maus wieder zurück!