pommeke
Gebruiker
- Lid geworden
- 17 jul 2007
- Berichten
- 232
Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Private Sub Keuzelijst9_Click()
If Me.Keuzelijst9 = 2 Then
Me.Diagnose.Visible = True
Me.Bijschrift11.Visible = True
Me.Screening.Visible = False
Else
Me.Diagnose.Visible = False
Me.Bijschrift11.Visible = False
Me.Screening.Visible = True
End If
End Sub
In de ontwerpwereld maken we gebruik van een aantal 'vaste' uitgangspunten, zoals: hyperlinks onderstrepen etc. Als je een gebruiker iets wilt laten kiezen, dan zijn daar verschillende opties voor, afhankelijk van wat er mag. Zo is een keuzelijst met invoervak prima als er maar één waarde gekozen mag worden, en een keuzelijst prima bij meervoudige selectie. Al mag je de laatste natuurlijk ook gebruiken voor één keuze.De vinkjes (ja/nee) moeten gedactiveerd worden als er op geklikt wordt.
...
Als je op een van de vinkjes klikt, moeten de andere deactiveren. Zodat er geen 2 vinkjes tegelijk aangevinkt kunnen worden.
Gaat het om aanklikvelden, zoals selectievakjes en radiobuttons, dan gelden daar óók 'wetten' voor: selectievakjes gebruik je als je meerdere opties mag aanklikken, en radiobuttons voor opties waarbij maar één keuze mogelijk is. Iedereen kent dat, snapt dat en gebruikt dat. Op het moment dat jij, als gebruiker daarvan af wilt wijken, moet je daar dus hele goede redenen voor hebben. Eerlijk gezegd zie ik die niet in jouw opzet, en het blijkt ook niet uit jouw omschrijving. Jij wilt gewoon drie opties, waarvan de gebruiker er één mag/moet kiezen. Dat kan prima, zonder gezeur, als je radiorondjes gebruikt, en geen selectievakjes.
En daarom geven we die ook . Je voorgestelde oplossing is dan nog steeds geen bruikbare, want het deactiveren is dan alleen maar vervelend. Je kunt dan namelijk geen andere meer aanklikken als je het een keer fout hebt gedaan. Je kunt veel beter de andere twee uitzetten bij de Click actie. Veel simpeler dus:Ik ben een amateur in access, geen pro zoals jij. Daarom vraag ik ook hulp.
Private Sub Diagnose_click()
Me.Repair = False
Me.Screening = False
End Sub
Private Sub Repair_click()
Me.Diagnose = False
Me.Screening = False
End Sub
Private Sub Screening_click()
Me.Diagnose = False
Me.Repair = False
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.