We help IT Professionals succeed at work.

Dates in VB

anna120297
anna120297 asked
on
Medium Priority
358 Views
Last Modified: 2008-02-01
My clients will enter the date of first payment.
I need to add month, week, bi-monthly, semi-monthly to this date and show on the screen. Can vb do it automaticaly or can someone help me with the code.
Comment
Watch Question

Use the DateAdd function.  Intervals must be Long integers, so fractional intervals will not work properly.

Dim MyDate As Date
Dim NextWeek As Date
Dim NextMonth As Date
Dim NextBiMonthly As Date
Dim NextSemiMonthlyA As Date
Dim NextSemiMonthlyB As Date

MyDate = CDate(Text1)
NextWeek = DateAdd("w", 1, MyDate)
NextMonth = DateAdd("m", 1, MyDate)
NextBiMonthly = DateAdd("m", 2, MyDate)
NextSemiMonthlyA = DateAdd("d", 15, MyDate)
NextSemiMonthlyB = DateAdd("m", 1, MyDate)

Not the solution you were looking for? Getting a personalized solution is easy.

Ask the Experts

Commented:
Nice job poo!
Access more of Experts Exchange with a free account
Thanks for using Experts Exchange.

Create a free account to continue.

Limited access with a free account allows you to:

  • View three pieces of content (articles, solutions, posts, and videos)
  • Ask the experts questions (counted toward content limit)
  • Customize your dashboard and profile

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.