Visual Basic - descargar con visual

buenos dias:
me gustaria hacer un programa que al decirle una direccion de internet que contiene un archivo zip te lo descargara , y que te vaya marcando el tiempo restante que le queda a la descarga y que tambie lo marque en un taskbar.

de momento lo unico que e conseguido es un codigo para descargar archivos pero no puedo poner el taskbar ni el tiempo restante, a continuacion os dejo el codigo:

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" _
(ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, _
ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
If lngRetVal = 0 Then DownloadFile = True
End Function
Private Sub Form_Load()
If DownloadFile(text1.text, commondialog2.filename) Then
MsgBox "Descarga completada correctamente", vbInformation
Else
MsgBox "La descarga no ha sido completada", vbCritical
End If
End Sub

'gracias