2009-08-21 4 views

答えて

1

本当に本当に基本的なあなたは年に

あなたが2009を変更する必要があります

、08、30のような何かができる試合コード、月、有効期限の日

Dim theDate : theDate = Now() 
Dim Result : Result = false 
if Year(theDate) <= 2009 then 
    if Month(theDate) <= 08 then 
     if Day(theDate) <= 30 then 
      Result = true 
     end if 
    end if 
end if 

if Result then 
    'Date is still valid do your code 
else 
    'Date is NOT valid do your code 
end if 
関連する問題