title image


Smiley Wozu dient Doevents?


Hallo



kennt jemand noch weitere Tips/Beispiele/Erklärungen, wie man einem

Anfänger erklären würde, was der Sinn von Doevents ist?









Benötigt 1 Label und 2 Command Buttons



Private Sub Command1_Click()

Dim i As Long

For i = 0 To 50000

Label1.Caption = i &" Mark verdient."

Next i

End Sub





Private Sub Command2_Click()

Dim i As Long

For i = 0 To 50000

Label1.Caption = i &" Mark verdient."

DoEvents

Next i

End Sub




 Die von mir vorgeschlagenen Lösungen wurden unter VB6 getestet (Betriebssystem: Windows 98 SE)
Meine Microsite


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: