Toon posts:

[vb] visible loop

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik heb een stuk code in mijn programma waarin ik eerst een label wil laten zien, dan even wachten en daarna het volgende label laten zien. Dit wou ik zo doen :

Dim wacht As Integer

Label1.Visible = True

For wacht = 1 to 1000
next wacht

Label2.Visible = True

For wacht = 1 to 1000
next wacht

Label3.Visible = True.

Als ik het programma run dan wacht hij even en dan krijg ik alle labels gelijktijdig te zien

Weet iemand hoe ik hier omheen kan

  • eek
  • Registratie: Februari 2001
  • Laatst online: 06-04-2020

eek

@MagickNET

heeft vb geen sleep functie?

Skill is when luck becomes a habit.


Verwijderd

ik zou een timer nemen want snellere computers zijn sneller klaar met die forloops.

Als je 'DoEvents' achter die .visible=true statements opneemt, dus:
code:
1
2
3
4
mylabel.visible=true
DoEvents

' andere code

dan voert VB je acties meteen uit.

Verwijderd

Topicstarter
Tnx Otis

  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 08:26

mulder

ik spuug op het trottoir

Label.Update werkt ook, en ik zou die Sleep gebruiken.

Dus:
code:
1
2
3
4
5
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

  Label1.Visible = True
  Label1.Update (of was dat Refresh...of is dat weer Delphi)
  Sleep(1000)

oogjes open, snaveltjes dicht