Visual Basic - Como saber cuantos archivos contiene una carpeta??

En una carpeta especifica tengo una cierta cantidad de archivos la cual se va incrementando mes a mes, lo que necesito es saber es la cantidad que tengo antes de procesarlos para poder ocupar un ProgressBar.

De antemano muchas gracias

No creo que haya una función que devuelva ese dato, pero puedes contarlos de esta forma:

Dim i As Long, nombre As String
nombre = Dir("c:\*.*")
Do While nombre <> ""
i = i + 1
nombre = Dir
Loop
MsgBox "Hay " & CStr(i) & " arhivos"

Ten en cuenta los atributos que pasas a la función Dir ya que puedes filtrar por nombre así como por atributos del archivo(oculto, de sistema,
directorio...)