Newsgroup: it.comp.appl.access
Titolo: listbox :eventi

domanda lampo...
Esiste un "qualcosa" per catturare il passaggio da una riga all'altra di una 
listbox?
Tipo un evento current(!)
Ho provato con mouse_down ma non č istantaneo..
mi sapete aiutare?
grazie
BC 

 wrote in message
news:45d9c927$0$20806$
5fc...@news.tiscali.it

Dopo Aggiornamento ?
Ciao
MArco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio 
news:f9287c361b05d81333b...@mygate.mailgate.org...

No...
questo č il codice...
al variare della riga cambia il recordsource di una sottomaschera che cosě 
si aggiorna...
Private Sub ElencoDegenti_AfterUpdate()
Dim IdElencoDegenti As Integer
Dim Selez As Variant
    For Each Selez In Me.ElencoDegenti.ItemsSelected
        If IsNull(Me.ElencoDegenti.Column(0, Selez)) Then
            Exit Sub
        End If
    IdElencoDegenti = Me.ElencoDegenti.Column(0, Selez)
    Next Selez
'''''''''''''''''''''''''''''''''''''''''''''''''
'imposta il recordsource della   sottomaschera
Form_FrmDatiDegenza.RecordSource = "SELECT DegentiM.ID, 
TblDefLetti.NomeLetto, DegentiM.Cognome, " _
& "DegentiM.Nome, DegentiM.Sesso, DegentiM.data_nascita, 
DegentiM.Comune_Nascita, DegentiM.Ricovero, " _
& "DegentiM.Dimissione, DegentiM.idCartClin, 
DegentiM.Nm_ProgressivoRicovero, DegentiM.DiaDim, DegentiM.Provenienza, " _
& "DegentiM.StrutturaProvenienza, DegentiM.TipoDimissione, 
DegentiM.StrutturaDimissione, DegentiM.Residenza " _
& "FROM TblDefLetti LEFT JOIN DegentiM ON TblDefLetti.NomeLetto = 
DegentiM.NomeLetto " _
& "WHERE DegentiM.ID = " & IdElencoDegenti & ""
End Sub
perň cosě non funziona...
BC 

 BC
Diciamo di no in modo Nativo.
Nel Sito di Lebans però trovi la soluzione(non esplicita).
Dai un'occhiata ai Demo relativi ai ToolTips(all'interno c'è una
classe dedicata per le listBox).
@Alex

Diciamo di no in modo Nativo.
Nel Sito di Lebans però trovi la soluzione(non esplicita).
Dai un'occhiata ai Demo relativi ai ToolTips(all'interno c'è una
classe dedicata per le listBox).
@Alex
Grazie dell'interessamento dimostrato....
però  .. non riesco a trovarlo, ce ne sono tante e tutte da  esplorare ..
e sinceramente mi sono perso in pagine e pagine di codice la maggior parte 
delle quali non comprendo del tutto o in parte...
grazie
Comunque
BC 

 BC
Non dire che ci sono troppi demo, ti ho detto che era relativo ai
ToolTip e nel sito c'è attivo il Search che ti elencava all'undicesimo
Posto proprio ToolTip.....
Il demo è questo, fà esattamente quello che chiedi, ora spero tu
riesca ad estrarre quanto richiesto dal codice completo che non è dei
più semplici...
http://www.lebans.com/tooltip.htm
@Alex

 ha scritto nel messaggio 
news:1171906078....@h3g2000cwc.googlegroups.com...



http://www.lebans.com/tooltip.htm
@Alex
........ mi arrendo !
l'ho trovato... ma non ci capisco (quasi ) nulla
BC 

 BC
Si immaginavo, non per colpa tua non ti preoccupare, ma come ti dicevo
non è affatto semplice e credo metta in difficoltà anche molti
esperti.
Se non hai una ottima dimestichezza con il codice VBA direi che quel
codice
non fà a caso tuo, e direi che pertanto non è fattibile.
@Alex

 però così non funziona...
In che senso non funziona?
Non ho ancora ben capito in cosa consista il tuo problema...
Saluti.