问个简单的月份问题

Question

怎样判断月份为当月

Answer 1

if month(theDate)=month(now()) then
  msgbox "当月"
end if

Answer 2

看看这里你会知道的
 
Year 函数
      返回 Variant (Integer)，包含表示年份的整数。语法Year(date)必要的 date 参数，可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null，则返回 Null。
 
Month 函数
      返回一个 Variant (Integer)，其值为 1 到 12 之间的整数，表示一年中的某月。语法Month(date)必要的 date 参数，可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null，则返回 Null。
 
Day 函数
      返回一个 Variant (Integer)，其值为 1 到 31 之间的整数，表示一个月中的某一日。语法Day(date)必要的 date 参数，可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null，则返回 Null。

Answer 3

if month(theDate)=month(now()) and year(theDate)=year(now()) then
  msgbox "当月"
end if