Sie möchten beim Programmstart erreichen, dass sich die Form langsameinblendet. Oder es soll irgendwann ein zweites Fenster eingeblendet werden -aber eben langsam. Eine Möglichkeit ist, dies mit der API Sleep zu realisieren: Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Load() ' Deklaration der Breite der Form Dim lMaxWidth As Long lMaxWidth = Me.Width ' Form-Breite auf Null setzen Me.Width = 0 ' Form anzeigen Me.Show ' so lange die Form ihre Breite nicht erreicht hat While Me.Width < lMaxWidth ' stückweise einblenden Me.Width = Me.Width + 30 Me.Refresh Sleep 30 Wend End Sub Diese Seite wurde bereits 10.484 mal aufgerufen. |
vb@rchiv CD Vol.6 Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung sevAniGif (VB/VBA) Anzeigen von animierten GIF-Dateien Ab sofort lassen sich auch unter VB6 und VBA (Access ab Version 2000) animierte GIF-Grafiken anzeigen und abspielen, die entweder lokal auf dem System oder auf einem Webserver gespeichert sind. |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |