WHAT's Wrong with this Code [doesnt work!]? RUNTIME VB says DLL entry point for INTERNET_DOWNLOADCOMPLETE not found.

Please email Correct code. Thanks

Private Declare Function _
INTERNETEXPLORER_DownloadComplete Lib "wininet.dll" ()

Private Sub Command1_Click()
If INTERNETEXPLORER_DownloadComplete Then
MsgBox (WINNET)
End If
End Sub