VB 2010 Loop Help

Hello all.....been awhile since I was last here, but I have run into a problem and require some assistance.

I am in the middle of a programming assignment requiring loops. Loops are not my strong suit. Here is the pseudo-code of what I need to do:

1) Click Event procedure
2) Calculate Pay for Option 1 = Pay rate starts at $1 on day 1 and doubles for each successive day up to 10 days (total reached should be $1023)
a) Day 1 = $1
b) Day 2 = $2
c) Day 3 = $4
............
j) Day 10 = $512
3) Calculate Pay for Option 2 = Term (10 days) * $100 = $1000
4) Display final calculations in form

This needs to be done in as concise a loop as possible.....I have tried everything I can think of and am beyond frustrated. The issue I have is with Option 1...It needs to be in some form of a Do-While loop and can include If statements.

Please reply as soon as is possible since this assignment is due in the next couple of days.

Thanks