Formulario con Sezioni

Ho creato un db in cui ho inserito un formulario con sezioni per produrre l’effetto “a schede” ed ho inserito un pulsante per il richiamo di ciascuna sezione.

Il problema è creare una macro che inserita in “Eventi->Esegui L’Azione” mi visualizzi per ciascun tasto solo la sezione corrispondente.

Cercando in rete ho trovato qualcosa di simile, ma non ho capito come adattarlo al mio scopo perché chi ha prodotto quella macro ha pensato bene di non commentare nulla…

Immaginando di avere un formulario chiamato FORM e quattro sezioni chiamate UNO, DUE, TRE e QUATTRO (w la fantasia), come impostare lo script?

Questo è quello che ho trovato, ma non saprei proprio come modificarlo per adattarlo al mio caso.

sub PysAfficher(PysEvent)

dim i as integer

for i = 0 to thiscomponent.TextSections.count - 1

if thiscomponent.TextSections(i).name = PysEvent.Source.Model.Name then

thiscomponent.TextSections(i).IsVisible = true

else

thiscomponent.TextSections(i).IsVisible = false

PysEvent.Source.Model.parent.getByName(thiscomponent.TextSections(i).name).state = 0

end if

next i

end sub

Qualcuno è in grado di aiutarmi e magari indicarmi anche dove trovare un po’ di documentazione su come scrivere una buona macro?