עזרה עם הפונקציה AnimateWindow ב-vb

השתמשתי בפונקציה AnimateWindow:

הצהרה:

 Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Boolean
  Const AW_BLEND = &H80000
  Const AWF_Hide = &H10000
  Const AWF_Center = &H10

וב-form load:

Private Sub Form_Load()

  AnimateWindow Me.hwnd, 1500, AWF_Center

End Sub

כשהפורם נפתח הוא נפתח בצבע שחור. לא משנה מה צבע הרקע.

איך אני יכול לעשות שהוא יפתח בצבע הרקע או לחילופין בצבע אחר שאקבע מראש.

תודה!