Hay unas funciones de tipo Date; DateDiff, DateAdd etc. Para agregar días es algo así:
Dim Dias As Integer = 5 ' Variable que contiene el número de días a aumentar.
Dim Fecha As String = Date.Now 'Fecha a la que se le aumentarán los días.
Fecha = DateAdd(DateInterval.Day, Dias, CDate(Fecha))