Newsgroup: it.comp.lang.visual-basic
Titolo: [?][Combo] Una combo intelligente...

Salve,
stavo porvando a far si che che una combo mi termini una parola in
funzione di una lettera che ci scrivo dentro...a dire il vero volevo
fare una cosa più carina :)) Ok, mi spiego meglio.
Ho una combo con delle parole dentro, io vorrei che alla pressione di
una lettera, se questa è l' iniziale di una di quelle parole, la
paraola in questione viene selezionata nella combo e la parola che
stavo per scrivere si termina da sola.
Insomma come accade spesso in win...come si fa questa cosa??
Ho provato a giocare un po con gli eventi KeyUp, KeyPress...ma una
volta intercettate la lettere premuta, solo con una select gigante
posso far terminare la parola? Non c'è una soluzione più pulita e
decente?
Spetto news :))
Saluti...



Sito Comune
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

>Sito Comune
Oh...è proprio il caso di dire che...ME L' HA SPIGATO IN
DUE PAROLE!! :))
Saluti...
----------------------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
http://www.murialdo.it/it_lang_vb
----------------------------------------------------------------------------------------
--------------------------------
Inviato via 
http://usenet.iol.it
 

Egregio Sig. Sirri,
Lei che č sempre cosě gentile e premuroso con noi
dummies :)) mi direbbe cortesemente...MA DOVE L' HAI VISTO QUELLO CHE
CHIEDO IO SUL SITO COMUNE?!? :p
Saluti...
----------------------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
http://www.murialdo.it/it_lang_vb


 posso far terminare la parola? Non c'č una soluzione piů pulita e


 CHIEDO IO SUL SITO COMUNE?!? :p
Non so se sul SC c'e' un esempio diretto, so che una implementazione la feci
io per il progetto del Codice Fiscale (presente sul Sito Comune).
Ti posto qui sotto il codice usato in quel caso.
Se puoi, fanne anche un progettino ed invialo ad Sito Comune, almeno siamo
sicure che c'e' :-))
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
    Dim S As String
    Dim T As String
    Dim Colore As Long
    On Error GoTo ErrFas
    Colore = 0
    T = Trim(Text1)
    If T = "" Then
        Text1.Tag = T
        Exit Sub
    End If
    If Len(T) = 1 Then S = T
    COMUNI.Seek ">=", T
    If Not COMUNI.EOF And Not COMUNI.NoMatch Then
      If UCase(T) = UCase(Mid(COMUNI!COMU_DESCR, 1, Len(T))) Then
        If Len(T) > Len(Text1.Tag) Then
            Text1 = COMUNI!COMU_DESCR
            Text1.SelStart = Len(T)
            Text1.SelLength = Len(Text1) - (Len(T))
            Text2 = COMUNI!COMU_PROV
            Text3 = COMUNI!COMU_COD
        End If
      Else
        If Text1.ForeColor = 0 Then MsgBox "Comune non in elenco"
        Colore = &H80&
        Text2 = "?"
        Text3 = "?"
        Text1.SetFocus
      End If
    End If
    If Text1.ForeColor <> Colore Then Text1.ForeColor = Colore
    Text1.Tag = T
Exit Sub
/\/\/\/\/\/\/\/\/\/\/\/\/
| Qui sul NG è nata una iniziativa:
|  Partecipa alla stesura di progetti VB sviluppati in team,
|  informati sul Sito Comune sezione Leonardo. Io
|  partecipo al progetto Data Raptor, alleati con noi.
\/\/\/\/\/\/\/\/\/\/\/\/\
Ciao
Ettore Maronese, il Mes
http://www.maronese.com/mes
Sito Comune di questo NG
http://www.murialdo.it/it_lang_vb

 ha scritto


CHIEDO IO SUL SITO COMUNE?!? :p
Egregio Sig. Skunk,
mi scuso per l'informazione solo parzialmente corretta: infatti l'esempio verso cui intendevo
indirizzarLa č proprio quello citato dal Sig. Maronese: colgo l'occasione per invitare lo stesso
Maronese a preparare un esempio esplicito (o una FAQ) su questo argomento affinché risulti piů
visibile ad ogni utente del Sito Comune.
Porgendole nuovamente le mie piů sentite scuse, le auguro buona navigazione all'interno del Sito
Comune.
Sirri Moreno
WebMaster del Sito Comune di questo newsgroup:
http://www.murialdo.it/it_lang_vb
it_la...@murialdo.it

combo autocomplete
L' uomo dal link facile ha colpito ancora :) Ma dove li trovi te tutti
questi indiriss!!!
Grazie cmq.
Saluti...


molto veloce.
Se tante volte
spulciando in giro ritrovi l' esempietto, magari mandamelo...
Grazie.


le auguro buona
navigazione all'interno del Sito Comune.
Hehehe, fate funzionare la
ricerca!! :)
Saluti
-----------------------------------------------------------------------------------------


ricerca!! :)
Sarà attiva prima che tu finisca di leggere il libro di Kurata...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------


 Sarà attiva prima che tu finisca di leggere il libro di Kurata...
eheheh.. non ti bastava perdere una scommessa?
vuoi perderci pure la faccia?
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 Grazie cmq.
su internet.
:)

 vuoi perderci pure la faccia?
si vede che e' sicuro che per la scadenza la ricerca sara' stata kurata...