VB per Acces :got focus con variabile

[lupoezechiele]

Ciauz a todos,
come coso faccio a far prendere il focus ad un controllo
il cui nome dipende da una variabile
ho provato così ma non funzia:

Public Function liberatavolo()
   Dim nometavolo As Control
   nometavolo = Me!cercaconto.Value
   DoCmd.GoToControl nometavolo.Name
   verde = RGB(0, 255, 0)
   ActiveControl.ForColor=verde
End Function

il mio scopo è il seguente:
ho 10 pulsanti (tavolo1, 2...,10)
ed 1 pulsante libera_tavolo
un campo testo ha il valore nometavolo

quando clicco su libera_tavolo
si deve cambiare il ForColor del pulsante che ha il nome
pescato nel campo di testo
:master:
ma non ne vuole sapere
help


*******************
Nota del moderatore:
sei pregato di utilizzare gli appositi tag per il codice da postare, [*code][*/code] (senza *) tra i quali potrai scrivere tutto il codice che vuoi.
se non ti è chiaro leggiti il regolamento, cosa che a quanto pare non hai fatto o forse non ti interessa. le regole sono regole.

[lupoezechiele]

Nota per il moderatore:
ad esser precisi le regole le ho lette ma sotto
il forum programmazione non si parla di quel che dici tu,
poi per scrupolo sono andato sulle regole di VB e VB.Net
e mi sono accorto che effettivamente c'è qualcosa,
peccato che sia segnalato come consiglio utile e non come regola!

detto questo che mi sembrava doveroso perchè ammiro e rispetto il vostro lavoro e vi ringrazio perchè senza di voi non saprei proprio come fare, però la ripresa era un po' eccessiva.

cmq nel frattempo ho risolto

Public Function liberatavolo()
Dim nometavolo As Control
Set nometavolo = Forms!Mcontotavolo!cercaconto
 DoCmd.GoToControl nometavolo
 pulsante = ActiveControl.Name
verde = RGB(0, 255, 0)
carica = "c:/icone/v" & pulsante & ".bmp"
ActiveControl.Picture = carica
ActiveControl.ForeColor = verde
End Function

ciauz

[xegallo]

non nella parte dei consigli ma in quella dittatoriale c'è scritto che per eventuali polemiche scrivere in pvt ai moderatori