Newsgroup: it.comp.lang.visual-basic
Titolo: Controlli combobox

Salve a tutti,
ho una domanda che forse per voi è banale:
Vorrei fare in modo che mentre digito una parola in una combobox, mi appaia
sotto la lista che mi si posiziona sulla prima parola che trova via via che
digito i caratteri o che mi faccia una specie di completamento automatico.
Se la combobox non va bene e ci vuole un altro controllo fatemi sapere.
Se sono stato poco chiaro ditemelo.
Grazie fin da ora a tutti.
Andrea

 ho una domanda che forse per voi è banale:
Se ti è venuto il dubbio che fosse banale, perchè non hai cercato la
risposta su google?
http://tinyurl.com/hc2n6
-- 
Salutoni
Sergio
La vita è un lungo apprendistato per imparare ad essere giovani
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Non ci avevo provato.
Grazie mille
Sei stato molto utile.
Oramai ho già postato altre 2 domande ma le vado a controllare su Google.
Andrea.

 digito i caratteri o che mi faccia una specie di completamento automatico.
Mi č servito poco tempo fa.
In una form metti un combo1 e un command button (non ricordo se c'č qualche
proprietą per la combo da settare)
poi incolla questo
Ciao
**
Private Declare Function SendMessageString Lib "user32" Alias
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As
Long, ByVal lParam As String) As Long
Private Const CB_FINDSTRING = &H14C
Private blnDelete As Boolean
Private Sub Combo1_Validate(Cancel As Boolean)
  nRet = SendMessageString(Combo1.hwnd, CB_FINDSTRING, 0, Combo1.Text)
  'Debug.Print Combo1.Text
  nSelStart = Combo1.SelStart
  If nRet < 0 Then
    MsgBox "no"
    Combo1.Text = ""
  Else
    MsgBox "si"
  End If
End Sub
Private Sub Form_Load()
Combo1.Clear
Combo1.AddItem "PIPPO"
Combo1.AddItem "PLUTO"
Combo1.AddItem "PAPERINO"
End Sub
Private Sub Combo1_Change()
  Dim nRet As Long
  Dim nSelStart As Long
  If blnDelete Then Exit Sub
  nRet = SendMessageString(Combo1.hwnd, CB_FINDSTRING, 0, Combo1.Text)
  'Debug.Print Combo1.Text
  nSelStart = Combo1.SelStart
  If nRet >= 0 Then
    Combo1.ListIndex = nRet
    Combo1.SelStart = nSelStart
    Combo1.SelLength = Len(Combo1.Text)
  End If
End Sub
Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)
  Select Case KeyCode
    Case vbKeyDelete, vbKeyBack
      blnDelete = True
    Case Else
      blnDelete = False
  End Select
End Sub
**

 
http://tinyurl.com/hc2n6
Ok, io ho trovato questo:
http://tinyurl.com/rcspw
Però non fa uscire l' elenco a tendina con tutti i possibili completamenti 
come in IE o FireFox ma visualizza solo il primo possibile completamento 
direttamente nella combobox...
Qualcuno sa come fare uscire anche l' elenco a tendina in .net 2.0?
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
"Un problema non è un problema se può essere risolto" 

 Qualcuno sa come fare uscire anche l' elenco a tendina in .net 2.0?
con il Framework 2.0 sono stati potenziati (e parecchio) anche i controlli 
"standard" quali TextBox e ComboBox.
Nello specifico, è stata aggiunta la funzionalità di autocompletamento... 
pertanto guarda, nell'help di questi controlli, alle voci 
'AutoCompleteMode', 'AutoCompleteSource', ecc. ecc.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 alle voci 'AutoCompleteMode', 'AutoCompleteSource', ecc. ecc.
E' vero!
Non ci avevo proprio fatto caso...
E' perfetto, grazie!
