Generar folios automáticamente en vb

Hola como puedo generar un folio con el formato fecha (dd/mm/aa)+un numero consecutivo