login  Naam:   Wachtwoord: 
Registreer je!
 Forum

OPGELOST ~ [VBasic] Wachten

Offline AgentX - 28/08/2006 16:58 (laatste wijziging 30/08/2006 20:44)
Avatar van AgentXHTML beginner Hallo masters,

Weet iemand hoe ik in Visual Basic in een script kan wachten?

Voor degenen die het niet begrijpen (wat ik me kan voorstellen ):
objectnaam.functienaam(milliseconden)

Alvast bedankt!

9 antwoorden

Gesponsorde links
Offline Ontani - 28/08/2006 17:32
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1
php code - Bekijk de code zonder highlighting - Klap code in 
  1. Set WScript = CreateObject("WScript.Shell")
  2. WScript.Sleep 2000
Offline AgentX - 28/08/2006 17:45 (laatste wijziging 28/08/2006 19:56)
Avatar van AgentX HTML beginner Ehm, moet er niet Dim WScript voor?

enne, als ik dat doe krijg ik:
Public member 'Sleep' on type 'IWshShell3' not found.

Niet om vervelend te doen, maar ik krijg wonderbaarlijk weinig reacties. Komt dit om dat het over VBasic gaat??
Offline Ontani - 28/08/2006 21:06
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1		 Praat je nu over Visual Basic of over VB-Script
Offline rickwieman - 29/08/2006 13:30
Avatar van rickwieman Onbekend
Citaat:
... hoe ik in Visual Basic in een script ...


Lijkt mij dat het over Visual Basic gaat 
Offline Skelton - 29/08/2006 13:43
Avatar van Skelton Nieuw lid Hier is een klein scriptje met een wachttijd dat de cursor verbergt en als de wachttijd verloopen is wordt de cursor terug getoond.
Gewoon een button op je form zetten en dubbelklikken.
php code - Bekijk de code zonder highlighting - Klap code in 
  1. Private Sub Button1_Click(ByVal sender As System.Object, _
  2.  
  3.         ByVal e As System.EventArgs) Handles Button1.Click
  4.  
  5.  
  6.  
  7.         Pauze(1000)
  8.  
  9.         MessageBox.Show("Ik ben uitgerust", "Pauze")
  10.  
  11.  
  12.  
  13.     End Sub
  14.  
  15.  
  16.  
  17.     Private Sub Pauze(ByVal tijd As Integer)
  18.  
  19.         Dim wacht As System.Threading.Thread
  20.  
  21.         Cursor.Hide()
  22.  
  23.         wacht.Sleep(tijd)
  24.  
  25.         Cursor.Show()
  26.  
  27.     End Sub

Pauze is een subprocedure met als argument een wachttijd in milliseconden.
Offline Ontani - 29/08/2006 13:46
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1		 @rickwieman: Hij praat over Visual Basic en hij praat over een script. Visual Basic is een programmeertaal VBS een scripttaal
Offline AgentX - 30/08/2006 16:59
Avatar van AgentX HTML beginner Maar goed.. ik wil dus geen button om te wachten, maar gewoon een actie uitvoeren, en dan even wachten.

Hoe doe ik dit?
Offline Ontani - 30/08/2006 17:13
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1		 je bent toch niet simpel zeker?
gewoon de functie pauze aanroepen met een integer als argument:

Pauze( 1000 )
Offline AgentX - 30/08/2006 20:44
Avatar van AgentX HTML beginner Nou, ik moet het dus zelf weer oplossen:

php code - Bekijk de code zonder highlighting - Klap code in 
  1. Private Sub Pauze(ByVal tijd As Integer)
  2.         Dim Wacht As System.Threading.Thread
  3.         Wacht = Nothing
  4.         Windows.Forms.Cursor.Hide()
  5.  
  6.         Threading.Thread.Sleep(tijd)
  7.  
  8.         Windows.Forms.Cursor.Show()
  9.  
  10.     End Sub


Dit heb ik nu en dat WERKT. Maar nog niet zoals Ontani het zei, want je moet wel "wacht" meegeven. Anders werkt het niet!

Naja, in ieder geval, bedankt voor hulp en aandacht!
Gesponsorde links
Dit onderwerp is gesloten.
Actieve forumberichten
© 2002-2024 Sitemasters.be - Regels - Laadtijd: 0.19s