pues eso del titulo
yo ya lo he hecho manualmente regulando el tamaño manualmente pero no me convence debe haber alguna otra forma.
ustedes la conocen?
es posible?
aqui un ejemplo pero me parece muy chancho....
Private Sub MostrarListaCoincidencias(quien As TextBox, lista As String[], ver As Boolean)
lstLista.Clear()
lstLista.Visible = ver
lstLista.List = lista
lstLista.x = quien.X
lstLista.Y = quien.y + quien.Height
lstLista.Width = quien.Width
If lstLista.Count < 10 Then
If lstLista.Count = 1 Then
lstLista.Height = lstLista.Count * 25
Else
lstLista.Height = lstLista.Count * 23
Endif
Else
lstLista.Height = 10 * 23
Endif
InsertaAqui = quien
End
lstLista.Clear()
lstLista.Visible = ver
lstLista.List = lista
lstLista.x = quien.X
lstLista.Y = quien.y + quien.Height
lstLista.Width = quien.Width
If lstLista.Count < 10 Then
If lstLista.Count = 1 Then
lstLista.Height = lstLista.Count * 25
Else
lstLista.Height = lstLista.Count * 23
Endif
Else
lstLista.Height = 10 * 23
Endif
InsertaAqui = quien
End