SoloCodigo

como minimizo una ventana q no tenga borde osea aqui tengo un codigo pero no me lo minimiza ala barra de tareas simplemente desaparece
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Long

Private Declare Function ShowWindow Lib "user32" ( _
    ByVal hwnd As Long, _
    ByVal nCmdShow As Long) As Long

Const SW_HIDE = 0
Const SW_NORMAL = 1

Dim Handle As Long

Private Sub Command1_Click()
    Handle = FindWindow(vbNullString, Me.Caption)
    Call ShowWindow(Handle, SW_HIDE)
End Sub


Private Sub Command2_Click()
     Handle = FindWindow(vbNullString, me.caption)
    Call ShowWindow(Handle, SW_NORMAL)

End Sub


COMO HAGO PARA ENVIARLO ALA BARRA DE TAREAS NO PUED AYUDEN PLZZZZ

jajajaja gracias por la gran duda esque mi form estaba sin borde y la propiedad me.ShowInTaskbar  se volvia ah false solo teniq cambiarle ah true y asuntio arreglado la api es mucho hjejeje me hice un mundo por algo simple muchas gracias