by
15. settembre 2009 11.14
Per quanto hai cercato un combobox con la possibilità di ricerca? Ecco una semplice implementazione:
Private Sub
CombBox1_KeyPress(ByVal sender
As Object, ByVal e
As
System.Windows.Forms.KeyPressEventArgs) Handles
ComboBox1.KeyPress
Dim findString
As String =
String.Empty
If (Not
e.KeyChar.IsLetterOrDigit(e.KeyChar, 0)) Then Exit Sub
findString
= e.KeyChar
With
ComboBox1
.SelectedIndex =
ComboBox1.FindString(findString)
End With
If
ComboBox1.SelectedIndex > -1 Then e.Handled =
True
End Sub
Ciao a tutti!
by
15. settembre 2009 11.03
Chissà a quanti è capitato di dover cercare all'interno di un combobox un elemento presente (non un valore). Per risolvere il problema il comando da scrivere è piuttosto semplice:
Me.cb.SelectedIndex = Me.cb.FindString("valore")
Il comando FindString presente tra le proprietà del combobox restituisce un intero che è la posizione del valore cercato all'interno degli elementi presenti nel combobox. In questo caso si è scelto di selezionare il valore trovato.