I would replace
For intDays = 1 To cboDays.Text
with
For intDays = 2 To cboDays.Text
Your program starting setting is 1 day.
To handle 0 day, you have to check for value 0 and in this case say result is 0 instead of doing normal program. Try to find the solution by yourself.