Hola, quiero dar el efecto que abre un control de una forma mas linda......
El tema es que la propiedad Height de la lista siempre me queda en 0 por mas que aumente.
Es un error del VS o estoy haciendo algo mal?
Public Sub AbrirLista()
lstErrores.BringToFront()
lstErrores.Visible = True
lstErrores.Width = 0
lstErrores.Height = 0
Dim T As Boolean = False
While Not T
If lstErrores.Width <= 351 Then
lstErrores.Width = lstErrores.Width + 1
End If
If lstErrores.Height <= 503 Then
lstErrores.Height = lstErrores.Height + 1
End If
If lstErrores.Width = 352 And lstErrores.Height = 504 Then
T = True
Else
System.Threading.Thread.Sleep(10)
End If
End While
End Sub
