How to move files older than today's date to other folder

This is how to get a list of the files you want…

New System.IO.DirectoryInfo("C:\temp").GetFiles("*").Where(Function(s) (CDate(s.CreatedDate) < Today))

Just put that into a For Each: