C'è un problema che mi sta perseguitando e non riesco a capire come risolverlo.
Ho descritto il form della classe FMain che comprende quattro pulsanti, uno di questI, ButtonIns, stranamente, dopo la partenza del programma, appena esso prende il focus dal mouse si colora in verde, questo però io non lo vorrei!
Per completezza devo aggiunger che ho inserito nel listato due istruzioni
ButtonIns.Background = &00FF00
Una nella Sub ListClienti_Select() e l'altra nella Sub ButtonIns_Click().
Ho visto anche il form, ma anche li non penso ci siano problemi di sorta, o per lo meno....., in effetti l'attributo Background non è settato ad alcun valore, avrei dovuto dargli una scelta?
Ringrazio e saluti.
Beh! :-\ il problema è che non so quale parte del listato ne sia responsabile, ti posso postare le due procedure di cui ho parlato prima, spero che possano servire....
Eccole:
Public Sub ListClienti_Select()
'############################################################## Scelta del cliente da elaborare da ListBoxClienti #####
nCli = ListClienti.index
VERIFICA_DDT()
tipoBll = serv$[nCli, 2]
ButtonIns.Background = &00FF00
ButtonStamp.Background = &FF0000
End
La seconda (abbastanza simile):
Public Sub ButtonIns_Click()
'########################## Scelta di inserimento dei dati nel mese e cliente selezionato dal bottone INSERIMENTO #####
If nCli = -1
Return
Endif
swIns = True
swStm = False
ButtonIns.Background = &00FF00
If puntMese <> 0
ButtonStamp.Background = &HFF0000
Endif
ButtonElab.Background = &00FF00
End