Newsgroup: it.comp.appl.access
Titolo: Controllo ListBox: Recuperare etichette campi

Ho un controllo Listbox basato su una query.
Iterando sull'insieme Itemselected e poi sull'insieme columns riesco a
recuperare i valori dei campi. Mi occorrerebbe tuttavia anteporre ai
valori dei campi l'etichetta associata al campo. 
I pratica:
Dim varItem as variant
Dim I As Integer
Dim strDescrizione As String
 For Each varItem In Me.CasellaRighe.ItemsSelected
    For I = 0 To Me.CasellaRighe.ColumnCount -1
         strDescrizione = strDescrizione & " " & _
         Me.CasellaRighe.Column(I,varItem)
    Next I
    strDescrizione = strDescrizione & vbCrLf
 Next
Aggiungendo all'espressione che calcola strDescrizione l'spressione:
Currentdb().QueryDefs(CasellaRighe.RowSource).Fields(I).Name
riesco anteporre il nome del campo chè però inadatto a descrivere il
campo in quanto il nome stesso non è immediatamente comprensibile
all'utente.
C'è qualcuno che sa indicarmi come fare per recupeare l'etichetta ?
Grazie

"Four wheeler" <no_ma...@nomail.it.invalid> ha scritto nel messaggio news:h5pl62ti1n12lvkan...@4ax.com...

Intendi l'etichetta "legata" (o affiancata) alla listbox?
Ciao.
-- 
Sergio MAZZA 

Intendi l'etichetta "legata" (o affiancata) alla listbox?
No, credo di essermi espresso male: intendo quelle che vengono
visualizzate impostando a "Sģ"  la  proprietą "Intestazione Colonne"
del controllo stesso.
Se la "Origine riga"  del controllo č una query o un istruzione SQL
dove viene usata l'espressione  select Miocampo AS MioAlias, vorrei
recuperare da codice proprio MioAlias

No, credo di essermi espresso male:
[Risposta]
L'importante è che lo credano coloro che leggono.... non pensi..?
 intendo quelle che vengono
visualizzate impostando a "Sì"  la  proprietà "Intestazione Colonne"
del controllo stesso.
Se la "Origine riga"  del controllo è una query o un istruzione SQL
dove viene usata l'espressione  select Miocampo AS MioAlias, vorrei
recuperare da codice proprio MioAlias
[Risposta]
Non ho mai provato ma credo che siano l'Item di ordine (0) qual'ora sia
impostata la proprietà che accenni = Si.
Prova a puntare alla Collection Items(0) e vedere cosa restituisce....!
Ciao
@Alex


Non ho ben capito cosa intendi dire ! Io ho posto la domanda in modo
un' po' prolisso  per cercare di spiegare il problema e la risposta di
Sergio Mazza mi ha fatto ritenere che il mio sforzo sia stato inutile
in quanto evidentemente mi "sono" espresso male :-(. Ritengo questa
espressione una forma di cortesia nei confronti di chi ha letto la
domanda, perdendo del tempo cercando di capire quello che ho scritto.
Comunque sia, non è molto importante se la comunicazione è "corrotta"
per colpa del trasmittente o del ricevente: la sola cosa 'importante è
se la comunicazione  è corrotta o meno.
A mio parere in questo  forum (tuttavia  meno che in altri,
fortunatamente)   vi sono molte domande mal poste alle quali seguono
risposte improprie che nel migliore dei casi fanno perdere tempo,
talvolta generano malintesi o, nel peggiore dei casi, dispute su chi è
più bravo in italiano o a scrivere programmi: ne ricordo una sugli
anagrammi veramente deprimente... 
Ciao e grazie ancora

 Ciao e grazie ancora
Saluti
@Alex

Hai generato una polemica dove non serviva.
Sono andato oltre le intenzioni. Chiedo venia. :-(

Appunto ... Ora che lo so non è (più) pericoloso ma fino a che non lo
sai .... ;-).
Scherzi  a parte la tua spiegazione è preziosa per tutti quelli che
come me non erano a conoscenza della cosa e che magari, cambiando il
valore della proprietà si ritrovano con il codice che non funziona
più
(il famoso errore "fuori di uno" che sembra essere causa una marea di
bug nei programmi) e spiega appunto perchè è pericoloso (non sapere
esattamente come stanno le cose).
Secondo me infatti, dal punto di vista concettuale, una riga di nomi
di campo  è differente da una riga di dati contenuti nei campi. Quindi
se non ci sono record mi aspetto che il numero degli elementi sia 0:
questa è la regola generale (una query che non restituisce record ha
la proprietà recordcount = 0, anche se la riga con i nomi dei campi
viene visualizzata).
[Risposta]
Una Query non ha proprietà RecordCount, casomai il Recordset
basato sulla query...!
In ogni caso questo concetto è utile, spesso una Query così:
Select * From NomeTab Where 1=0
viene usato apposta per ricavare la struttura del recordset
al fine di popolare o strutturare controlli come OCX, quindi
benvenga questa cosa...!
Ciao
@Alex