自己做了個控件, 模擬combox, 現在的問題是按了下拉顯示按鈕後,在任務欄出現了個新窗口. 如何不讓他出現

Dim hWndDesktop As Long
        datItem.ScrollBars = flexScrollBarVertical
        datItem.FitWidth
        Shape1.Width = datItem.Width + 25
        Picture1.Width = Shape1.Width + 35
        Picture1.Visible = True
        Shape1.Visible = True
        Set m_ParentControl = txtMain
        Call Timer1_Timer
        SetParent Picture1.hWnd, hWndDesktop
        Picture1.ZOrder 0產生問題的行是;  SetParent Picture1.hWnd, hWndDesktop我試著用SetParent Picture1.hWnd, usercontrol.parent.hwnd 但是不顯示下拉窗口.
然後我又找到調用這個控件的窗口,得到他的hwnd 55555525, 再試, 也不可以.
大家有甚麼好辦法.