Scegliere valore combobox e fare in modo che venga visualizzato solo quello.

Question

Dunque...ho una maschera che si chiama inserimento_particella, all'interno della quale sono presenti 4 caselle di testo (Sezione, Foglio, particella, superficie) e 1 combobox (SeleNomeComune)...in questa combo ho impostato numero colonne 2 e prende i dati dalla tabella Tcomuni, campi IDCOMUNE,nome____, premetto che mettendo come dimensione della 1° colonna valore = a 0, faccio sì che l'utente veda solo il nome del comune.

Il mio problema è che il nome del comune che seleziono per la prima volta, voglio che venga riproposto all'interno della combo come UNICA SCELTA in tutte le selezioni che farò fin quando il database rimane aperto...qualkuno sà come posso fare?!

Answer 1

Ecco, ora hai chiarito il mistero

se idcomuni è un campo contantore con tipo dati testo devi modificare il codice come segue:

Me!cmbSeleNomeComune.RowSource = "SELECT IDCOMUNE, nome____ FROM Tcomuni WHERE IDCOMUNE = '" & Me cmbSeleNomeComune & "'"

ovvero aggiungendo un'apice prima e dopo il valore della combo

David

Answer 2

Ho fatto come hai detto...ma niente..mi dà lo stesso problema...caspita...cmq secondo me l'idea è quella giusta...solo che c'è qualke motivo di cui non nè riesco a venire a capo...percui non funziona...

Answer 3

Ciao Ghigho_85

Questo è il codice che ti ho postato io:

me!SeleNomeComune.rowsource="SELECT IDCOMUNE, nome____ FROM Tcomuni WHERE IDCOMUNE = " & me!SeleNomeComune

questo invece quello che hai scritto tu

Me!cmbSeleNomeComune.RowSource = "SELECT IDCOMUNE, nome____ FROM Tcomuni WHERE IDCOMUNE = " & Me!cmbSeleNomeComune & ""

come puoi vedere hai aggiunto in fondo al mio codice un & "". Toglilo. La clausola WHERE della query si basa su un campo numerico mentre con la tua aggiunta lo fai diventare una stringa.

David

Answer 4

Ciao...ti ringrazio della risposta, dunque....ho scritto nell'evento dopo aggiornamento...in generatore di codice, il seguente codice:

Private Sub cmbSeleNomeComune_AfterUpdate()

Me!cmbSeleNomeComune.RowSource = "SELECT IDCOMUNE, nome____ FROM Tcomuni WHERE IDCOMUNE = " & Me!cmbSeleNomeComune & ""

End Sub

Il problema è che non mi mette nella combobox (cmbSeleNomeComune), il nome del comune che ho scelto, me lo lascia bianco(vuoto)...e poi quando vado a rifare la selezione mi fa vedere una sola scelta (Giusto), ma anche lì non mi scrive il nome del comune precedentemente scelto, lasciandolo bianco....Quale può essere il problema?

Answer 5

Ciao Ghigo_85,

su evento dopo aggiornamento della combo, modifica l'origine della stessa impostandolo a

me!SeleNomeComune.rowsource="SELECT IDCOMUNE, nome____ FROM Tcomuni WHERE IDCOMUNE = " & me!SeleNomeComune

David