si,ho fatto cisi'....

codice:
Dim uno As String = dr("num_rapp")
Dim due As String = dr("num_rapp") & " - " & dr("cliente")
SelectionList1.DataValueField = uno
SelectionList1.DataTextField = due
SelectionList1.Items.Add(due)
pero' poi

codice:
strValore = SelectionList1.Items(SelectionList1.SelectedIndex).Value
strValore2 = SelectionList1.Items(SelectionList1.SelectedIndex).Text
assumono stesso valore.