PDA

Vollständige Version anzeigen : Warte zeit


Sugar
19.09.2001, 14:08
ich moechte eine warte Zeit einbauen wie koennt ich dieses umsetzten

<p align="left"><font size="1" face="Century Gothic"><font color="#000000">Moderatorenanmerkung: die Überarbeitung dieses Beitrages ist im Zuge der Arbeiten zu sehen, die durch den Wechsel der Forensoftware zum 01.01.2003 verursacht wurden.

Es wurde in diesem Beitrag ein Link entfernt.</font>

jinx
19.09.2001, 14:25
<font size="2" face="Century Gothic">Moin, Sugar,

da ich nicht weiss, ob in der Zwischenzeit etwas anderes gemacht werden soll...

<div><link href="http://www.ms-office-forum.net/forum/externals/codeconv.css" rel="stylesheet"><pre><span class="TOKEN">Sub</span> Nach2Minuten()
<span class="TOKEN">Dim</span> l <span class="TOKEN">As</span> <span class="TOKEN">Long</span>
<span class="TOKEN">Const</span> Puffer <span class="TOKEN">As</span> <span class="TOKEN">Long</span> = 120
&nbsp;
l = Timer
<span class="TOKEN">Do</span> <span class="TOKEN">While</span> Timer &lt; l + Puffer
DoEvents
<span class="TOKEN">Loop</span>
MsgBox (&quot;Zeit zum Warten&quot;)
<span class="REM"> 'Application.quit</span>
<span class="TOKEN">End</span> <span class="TOKEN">Sub</span></pre></div>
Code eingefügt mit dem MOF Code Converter (http://www.ms-office-forum.net/forum/codeconverter.php)

Wert für Puffer ist in Sekunden anzugeben, Aktionen sind anzupassen; hier erfolgt halt eine wenig informative Box.

<font size="1" face="Century Gothic">Moderatorenanmerkung: die Überarbeitung dieses Beitrages ist im Zuge der Arbeiten zu sehen, die durch den Wechsel der Forensoftware zum 01.01.2003 verursacht wurden.

Es wurden in diesem Beitrag der Code für dieses Forum und die Signatur angepasst.<font>