select case en zo

Status
Niet open voor verdere reacties.
J

JEPEDEWE

Terugkerende gebruiker
Lid geworden
14 jun 2006
Berichten
1.682
hallo,

Ik dacht even snel een select case reekske neer te zetten maar... jammer maar helaas... ik stoot op een compileerfout

Code: 
If TB1!teller = 1 Then
 Select Case TB2!Volgnr_beh
  Case 1
    'eerste reeks tarief1
  Case >1 and <6
    'eerste reeks tarief2
  case >6
    'eerste reeks tarief3
 End Select
Else   
End If

de fout zit bij
case >1 and <6

zal wel weer zelfuitgevonden code zijn vrees ik.... in elk geval de idee is het volgende:
als TB2!Volgnr_beh
1 is hanteer dan tarief 1
2-3-4 of 5 is hanteer tarief2
meer dan 6 is hanteer tarief3

Iemand de juiste syntax

Bedankt
 
Maak er dit van:
Case 2 To 5
 
amaai.. zo simpel...
en wat met de "meer dan 6"
JP

Bedankt voor de hulp
 
case >5 uiteraard ;)
En die Else mag eruit.

Dit mag overigens ook:
Case 2, 3, 4, 5
 
Laatst bewerkt:
Ik pleit schuldig Michel, maar ik verwacht, als ik een commando begin te typen, er automatisch extra info getoond wordt
Als ik begin met Select Case... dan komt er niets...

Anyway
Het is gelukt, waarvoor dank, maar; ik schrijf:
Code: 
                Select Case tb_prijs!volgnummer
                    Case 1
                        rek_PRIJS = 30
                    Case 2 To 5
                        rek_PRIJS = 24
                    Case 6 To 9
                        rek_PRIJS = 23,65
                    Case Else
                        rek_PRIJS = 5
                End Select
Als ik een getal met een komma wil ingeven dan krijg ik een foutmelding: verwacht: instuctie-einde
het vled is gedefinieerd als "valuta" dus..; wat doe ik hier verkeerd?

Merci
JP
 
Logisch. tb_prijs is een textbox. En daar staat alleen tekst in. Nu is die komma geen onderdeel van de waarde van de textbox maar een onderdeel van de code waardoor de compiler zich ermee bemoeit.

Dus moet je niet 23,65 gebruiken maar "23,65".
Het zal daarna voor het plaatsen in een cel eventueel nog wel geconverteerd moet worden naar het door de betreffende veld verwachte datatype.
 
Laatst bewerkt:
Zonder een voorbeeld document is het altijd gissen, maar een naam die begint met tb_ verraad veel.
Of is het een tabel?

Maar het doet niets af aan de gebruikte code.
Of je moet er 23.65 van maken.
In VBA werkt alles op z'n Engels.
 
Laatst bewerkt:
JEPEDEWE zei:
Ik pleit schuldig Michel, maar ik verwacht, als ik een commando begin te typen, er automatisch extra info getoond wordt. Als ik begin met Select Case... dan komt er niets...
Klik om te vergroten...
Select Case is ook geen object, maar een opdracht Daar kan je soms nog aanvullingen op zien, maar in dit geval niet; je zult zelf aan moeten geven hoe de Select er uitziet.

We werken met Amerkiaanse (niet Engelse) opdrachten, dus je zult ook de Amerikaanse notatie moeten gebruiken. Dan krijg je dit:
Code: 
                Select Case tb_prijs!volgnummer
                    Case 1
                        rek_PRIJS = 30
                    Case 2 To 5
                        rek_PRIJS = 24
                    Case 6 To 9
                        rek_PRIJS = 23.65
                    Case Else
                        rek_PRIJS = 5
                End Select
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan