....ma il ".SetFocus" non è una semplice funzione di diversi oggetti ?   
[/quote]
Hai ragione, ho scritto male il codice. La maniera esatta è:

La documentazione di Gambas pone il termine ".SetFocus" fra i metodi dei vari oggetti grafici di Gambas
Chiedo scusa per l'involontario errore. 

@giob1642:
Se hai completato, scrivi [Risolto] nel 1° post della disussione.

 

Esattamente!

@giob1642:
Secondo me navigare fra gli oggetti interni ad una Form con cicli di tipo whlie ... wend è oltremodo pericoloso, come è pure pericoloso dare frequentemente comandi "setfocus.object". Gambas ha i suoi criteri di gestione degli oggetti e dei loro eventi ed intervenire con setfocus.object a raffica porta a alterare profondamente la struttura di attivazione sequenziale delle classi costruita da Gambas internamente ad una Form.Class. Te lo dico perchè, nei miei approcci iniziali ho sbattuto il grugno tantissime volte con risultati imprevedibili, tanto che in qualche occasione ho dovuto affrontare loop anomali, difficili da individuare, anche attraverso la procedura di debug. Ho deciso allora di sostituire al "SetFocus.Object" il richiamo di una SUB o di una FUNCTION  comune agli eventi interessati ed ho eliminato quasi del tutto l'istruzione  "SetFocus.Object".

Ti consiglio perciò di abbandonare il concetto While...Wend e di pensare a qualche altra soluzione. Se dovessi avere bisogno di suggerimenti, domanda pure liberamente.
  

Ma dove l'hai letto? Secondo me, non me ne volere, hai maturato nel tuo programma una bella confusione. Quando entri nella documentazione di Gambas, direttamente dall'hide di gambas del tuo programma, col tasto "F1", clicca in successione su Componenti 3.0 --> Qt4 --> TextBox/ComboBox (quale vuoi): fra gli eventi trovi elencato anche il LostFocus.
Potrai constatare personalmente che l'evento LostFocus continua ad esistere e gode di ottima salute. Posso confermartelo anche praticamente perchè nel mio ContabFam utilizzo molto l'evento LostFocus sin da quando ho scritto le prime istruzioni sotto Gambas2. Quando ho installato Gambas3, ho attivato la conversione automatica da G2 a G3 ed il mio programma continua a funzionare bene anche in G3.

Per risolvere i tuoi problemi ci sono varie possibilità. Dovresti però fermare un pò la stesura di codice, leggere alcuni argomenti sul Wiki del Forum come "Miscellania --> Assegnare più oggetti ad un gruppo" ed altrri che mi viene difficile segnalarti perchè non conosco le tue difficoltà, ma sono sicuro che tu, scorrendo i titoli dei vari argomenti, sarai benissimo in grado di individuare.
Rivisitando poi, con maggioire consapevolezza conoscitiva, il tuo programma, vedrai che troverai molto da cambiare e, sicuramente, in meglio.
 

@ player:
Scusa se rispondo con qualche giorno di ritardo, ma sono stato fuori casa per qualche giorno ed ho letto soltanto l'ultimo tuo post.

Vediamo se ho capito quello che vorresti fare:
Da alcune tabelle del tuo DB vorresti leggere con un'unica query di tipo join i dati contenuti nei campi di record-tabella e visualizziarli, per es., dentro una TableView. Dalla letturta vorresti ricavare, oltre che i dati, anche i nomi delle singole colonne della tabella-query che costruirai per leggere il contenuto del DB. Potere fare tutto ciò automaticamente sarebbe bellissimo, ma non è purtroppo proprio così, perchè il formato sql di accesso ai DB accede alle colonne di una tabella di DB attraverso i nomi forniti nella riga sql.exec che ricerca nei nomi attribuiti in fase di creazione di ciascuna tabella di DB. Ciò significa che il nome campo(o colonna, chiamalo come vuoi) $Result!nome lo devi fornire tu, esattamente uguale a quello contenuto nella tabella d'origine del DB. In mancanza di tale corrispondenza, viene segnalato, durante l'esecuzione del programma, un errore formale sull'istruzione DbConn.Exec.

Utilizzando la struttura DB SQlite3 (conosco solo quella), supponiamo di avere creato un DB con due sole tabelle:

dim sql as string

sql = "CREATE TABLE Tabella1"
  sql = sql & "('idTabella1' INTEGER PRIMARY KEY AUTOINCREMENT," 
  sql = sql & " 'Campo1T1' INTEGER," 
  sql = sql & " 'Campo2T1' INTEGER,"  
  sql = sql & " 'Campo3T1' CHAR(1) DEFAULT NULL," 
  sql = sql & " 'Campo4T1' FLOAT,"
  sql = sql & " 'Campo5T1' VARCHAR(100) DEFAULT NULL"
  sql = sql & " );"
ApriDB.DB_Connection.Exec(sql)

sql = "CREATE TABLE '" & $Tabella2 & "'"                
  sql = sql & "('idTabella2' INTEGER PRIMARY KEY AUTOINCREMENT," 
  sql = sql & " 'Campo1T2' INTEGER,"  
  sql = sql & " 'Campo2T2' VARCHAR(50) DEFAULT NULL,"
  sql = sql & " 'Campo3T2' CHAR(1) DEFAULT NULL," 
  sql = sql & " 'Campo4T2' INTEGER"   
  sql = sql & " );"
ApriDB.DB_Connection.Exec(sql)

Supponiamo ora di dover leggere il contenuto di: Campo1T1, Campo3T1, Campo2T2, Campo3T2. La query occorrente è:

Dim RecQuery As Result

RecQuery = ApriDB.DB_Connection.Exec("SELECT * FROM  Tabella1,Tabella2 WHERE Tabella1.Campo1T1 = Tabella1.Campo1T2  ORDER BY  Tabella1.idTabella1 ")
For Each RecQuery
   CompilaRigaTableView
Next

Public Sub CompilaRigaTableView
'      ---bla---bla---bla---               Gruppo di istruzioni occorrenti per la compilazione delle righe di TableView
END

Fammi sapere se ho capito e se l'esempio riportato sopra  sia calzante alle tue necessità.
 

Hai ragione, la proprietà ".Clear" lascia inalterato il contenuto della PictureBox. La soluzione la suggerisce Minisini sempre nello stesso post di vuott:
che poi è quello che avevi già comunicato tu nel post d'apertura.

Se tu aggiungi il bordo alla PictureBox, dopo l'esecuzione dell'istruzione poc'anzi indicata, potrai vedere l'oggetto ripulito dell'immagine, ma col colore di fondo di default o quello eventualmente da te impostato.
Scusa per il disordine che ho generato. 
 

Dimenticavo: Buon caffè anche a voi.

Però, leggendo il post di vuott, ho provato così:


Ed ecco le due immagini.

Scusate, non ci avevo fatto caso. Ho fatto soltanto una prova veloce. 

funziona anche con

La strada non è lunga. Devi solamente affrontare le difficoltà che incontri una alla volta.
In questo momento dovresti lavorare su quello che hai già cominciato a gestire. Vero quello che ha messo in evidenza pastrank. Però non mettere troppa carne sui fuoco.
Ti do ancora due consigli:
- rispondi allle proposte già affrontate ed a cui non ha ancora risposto;
- leggi bene il contenuto della mia firma, dopo averne fatto tesoro, cammina sempre dentro il binario della razionalità
 

La tua Function Filtro è richiamata nell'evento KeyPress?

Non capisco la seguente istruzione

puoi scriverla anche così: 
Ma ricerca(stringa, ".") non funziona in quanto non  ricerca non è riconosciuto da Gambas. Fai invece

Inoltre, come ti ho già detto nel mio precedente post, l'istruzione:
non produce alcun effetto, perchè non verrà mai eseguita. il quanto quel lavoro è già egregiamente svolta dalla

Si, è una variabile String

l'istruzione if dell'esempio fornito da 9Bit trascura anche i crt "à, é, è, ì, ò, ù", ma trascura anche tutti i crt alfabetici, quindi puoi benissimo utilizzare solamente quella.Non hai perciò di usare la mia
Devi però testare anche i tasti come [Canc], [Tab], [Shift+Tab], [Backspace], [freccia indietro], [freccia avanti], perchè non sono sicuro che non vengano trascurati.
 

Scusami, ma continuo a non capirti. Il tuo intento porta ad azioni diverse:
1^a- trascurare tutti i caratteri diversi dalla virgola, dal punto e dai numeri.
              E questo ti conviene farlo come ti avevo suggerito, cioè con l'evento TextBox.KeyPress, perchè è la via più semplice, più leggera perchè risparmi istruzioni e sbrigativa. Lo stesso evento può controllare che venga immesso un solo "." o una sola "," e trascurare tutti quelli successivi al prmo.
2^a- la scrittura di una funzione che si occupi della conversione dell'eventuale crt "," in ".". Sono istruzioni che non si possono risparmiare perchè il crt immesso può essere, in KeyPress, soltanto controllato ed eventaulmente scartato, ma non può essere convertito in un crt diverso.
Secondo me la funzione non deve essere richiamata, ma semplicemente inserita come istruzioni dentro l'evetnto TextBox.Change, cioè subito dopo che il crt digitato è stato già aggiunto ai precedenti, già presenti nella TextBox.
3^a- una funzione specifica che si occupi dell'inserimento di crt alfabetici, secondo le tue necessità.

Spero di essere stato più chiaro. Non capisco perchè vuoi costruire a tutti i costi una funzione per gestire tutto quando non ne hai bisogno. Ricorda:
Meno codice scrivi, ... meno sbagli. 

Poi, se proprio non vuoi sentire ragioni, perchè hai simpatizzi per la superfunzione, fai come credi. Non posso che augurarti un buon 
  

Ma infatti io avevo capito che il "." fosse un crt da trascurare, mentre i numeri sarebbero comunque stati gli unici crt consentiti in digitazione. Però il prosieguo della discussione mi ha fatto capire che il problema fosse in realtà quello di individuare la ricorrenza di certi crt e la presenza singola di un certo crt. Non ne ho capito lo scopo perchè non è stato citato. Penso tuttavia, visto che è stato già considerato [Risolto], che possiamo benissimo risparmiarci qualsiasi approfondimento.
 

Quello che dici tu è vero, ma riguarda un concetto più generale che sta a monte di un progetto, quando invece si entra nel dettagli, ormai la fase progettuale deve essere stata affrontata, ragionata e completata. Poi qualsiasi progetto, piccolo a grande che sia, dovrebbe essere sempre sostenuto da una traccia scritta che si dovrebbe seguire perchè il progetto si mantenga sempre dentro i binari del disegno logico da realizzare, secondo la formula il programma costituisce l'insieme dei processi tecnici occorrenti per produrre il risultato voluto coi dati pertinenti a disposizione.
L'aspetto a cui ho accennato or ora sarebbe stato un ottimo argomento da inserire fra gli articoli del nostro e-zine, ormai in stato di quarantena dal lontano dicembre 2010.  
Ciò non significa che il Forum non possa essere d'aiuto; basta spiegare passo passo, senza timore di dilungarsi, partendo dall'idea di base. quello che si vorrebbe realizzare. In presenza di richieste di sostegno per la progettazione, i supporter, secondo me, dovrebbero limitarsi a dare opinioni progettuali teoriche, senza mai sostituirsi all'ideatore con soluzioni pratiche di realizzazione di Form e/o di classi. Non credo assolutamente che sia un vero aiuto. La soluzione pratica deve essere sempre scelta ed applicata dall'autore, unico proprietario dell'idea concettuale della realizzazione, salvo, naturalmente, una sua diversa indicazione durante tutta l'evoluzione della discussione.

Dopo lo sforzo sostenuto per scrivere codeste poche righe, ho riletto il tutto e, debbo dire, che mi sono capito. Spero di avere espresso il mio concetto chiaramente anche per chi, diversamente da me che hoavuto l'idea di scriverlo,  dovesse solamente leggere questo post.