user form vergrößern
15.01.2004 14:33:32
tina
Me.Width = 120
Me.Height = 60
While Me.Width < 370
Me.Width = Me.Width + 1
Me.Height = Me.Height + 1
' Me.Left = Me.Left + 0.7
' Me.Top = Me.Top + 0.6
Me.StartUpPosition = 1
DoEvents
Sleep 0
Wend
nun möchte ich dort gerne einbauen, dass wenn man darauf klickt, dass sie sich dann sofort in der vollständigen größe anzeigt........
und habt ihr vielleicht ne idee, wie sie sich ein bißchen schneller öffnet?
Danke Euch!!
(besonders natürlich Hajo und Ralf)