'...
DownloadFromFirebase(filepath)
Wait For storage_DownloadCompleted (ServerPath As String, Success As Boolean)
Log("Wait For is over. Continuing with next statement ...")
'...
Sub DownloadFromFirebase(filepath)
'...
storage.DownloadFile(filepath,destdir,destname)
Log("Download started ...")
'...
End Sub
Sub storage_DownloadCompleted (ServerPath As String, Success As Boolean)
Log("Download completed.")
End Sub