VBA
Excel VBA
Word VBA
Access VBA
VBScript
VB
C#
Objective-C
C++
SQL
JAVA
VBA (English)
Jobs
Übersicht
Thema
Datum
Von Nutzer
Rating
Antwort
Ampelschaltung VBA in Access
03.12.2008 19:25:58
DarkMordred
Aw:Ampelschaltung VBA in Access
05.12.2008 21:59:48
schikologic
Aw:Aw:Ampelschaltung VBA in Access
07.12.2008 14:44:17
DarkMordred
Ansicht des Beitrags:
Von:
schikologic
Datum:
05.12.2008 21:59:48
Views:
902
Rating:
Antwort:
Thema:
Aw:Ampelschaltung VBA in Access
Hallo,
die Variable für den Zähler muss außerhalb der Prozedur angegeben werden (im Deklarationsbereich).
Der Zähler muss erstmals auf 1 gestellt werden, wenn dieser noch unbelegt (empty) ist.
Modul:
Option Compare Database
Option Explicit
Private intZaehler As Byte
_____________________________________
Private Sub cmdTakt_click()
If intZaehler = Empty Then intZaehler = 1
Select Case intZaehler
Case 1
Me.lblRot.Visible = True
Me.lblgelb.Visible = False
Me.lblgruen.Visible = False
intZaehler = 2
Case 2
Me.lblRot.Visible = True
Me.lblgelb.Visible = True
Me.lblgruen.Visible = False
intZaehler = 3
Case 3
Me.lblRot.Visible = False
Me.lblgelb.Visible = False
Me.lblgruen.Visible = True
intZaehler = 4
Case 4
Me.lblRot.Visible = False
Me.lblgelb.Visible = True
Me.lblgruen.Visible = False
intZaehler = 1
End Select
End Sub
Ihre Antwort
Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
B
ei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema:
Name:
Email:
Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
B
ei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema
Datum
Von Nutzer
Rating
Antwort
Ampelschaltung VBA in Access
03.12.2008 19:25:58
DarkMordred
Aw:Ampelschaltung VBA in Access
05.12.2008 21:59:48
schikologic
Aw:Aw:Ampelschaltung VBA in Access
07.12.2008 14:44:17
DarkMordred