PDA

Vollständige Version anzeigen : Select-Befehl funktioniert nicht


bobst
18.01.2008, 07:13
Guten Morgen Access-Gemeinde

Nun möchte ich meine neu erworbenen VB-Kenntnisse in Access umsetzen und es will nicht funktionieren...

Es handelt sich um einen Select Case Befehl (Nach Aktualisierung) um Felder im Formular zu aktivieren oder deaktivieren (Ein- und Ausblenden).


Private Sub cboRisikokat_AfterUpdate()

Dim Risikoart As String
Dim Prod As String
Dim Roh As String
Dim Spez As String
Risikoart = Me!Risikokat

Select Case Risikoart
Case Prod
Me!Feld1.Enabled = True
Me!Feld2.Enabled = True
Me!Feld3.Enabled = False
Me!Feld4.Enabled = False
Me!Feld5.Visible = False
Case Roh
Me!Feld1.Enabled = False
Me!Feld2.Enabled = False
Me!Feld3.Enabled = True
Me!Feld4.Enabled = True
Me!Feld5.Visible = False
Case Spez
Me!Feld1.Visible = False
Me!Feld2.Visible = False
Me!Feld3.Visible = False
Me!Feld4.Visible = False
Me!Feld5.Visible = True
End Select
End Sub


Hab ich etwas Elementares vergessen?

Ich hoffe jemand von Euch weiss wie es geht...

Vielen Dank schon mal für Eure Hilfe

Gruss
Bobst

petbay
18.01.2008, 07:17
Hallo,

Da Risikoart ein String: Case "....."

Steffen0815
18.01.2008, 07:51
Hallo,
Hab ich etwas Elementares vergessen? Ja du hast den Variablen Prod, Roh, Spez gar keine Werte zugeordnet, wie soll da das Case was finden :rolleyes:
Sollten es Feldnamen sein, darfst du sie in der Prozedur nicht noch mal definieren. Außerdem gehört dann ein Me davor.

bobst
18.01.2008, 07:53
...nerv!!!

Danke vielmals

Gruss
Bobst