VB вчерашняя дата
DateTime.Now.AddDays(-1).ToString("dd.MM.yyyy")
dr4ft
DateTime.Now.AddDays(-1).ToString("dd.MM.yyyy")