Dim ldtExpire As Date Dim lsDate As String 'Set expiration date as 1/1/2004 - but don't be obvious lsDate = CStr(2 2) + "-" 'here is the day of the month ...
確定! 回上一頁