Como realizar una ventana desplegable tipo barra de herramienta
Debes poner un panel y un timer
haz click sobre el panel para que se desplegue , una vez desplegado vuelve a hacer click
para que se cierre
no se si era esto lo que querias hacer
un Saludo............................
Public Class Form1
Dim abre As Boolean
Dim cierra As Boolean
Private Sub Panel1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseDown
If Panel1.Height < 40 Then
abre = True
Else
cierra = True
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If abre = True Then
Panel1.Height = Panel1.Height + 10
If Panel1.Height > 100 Then
abre = False
End If
End If
If cierra = True Then
Panel1.Height = Panel1.Height - 10
If Panel1.Height < 30 Then
cierra = False
End If
End If
Me.Text = Panel1.Height
End Sub
End Class