指定日の？日 前後の求め方

OS:windows2000pro
VB:VB6.0sp5

１．システム日付(sysdate)から、xx 日後は、yy です
２．システム日付(sysdate)から、xx 日前は、yy です
　ただし、sysdate,yy は[YYYY/MM/DD]
　　　　　xx は３桁とする

この場合の処理方法をご教示くださいますよう
お願いいたします

No.1 ベストアンサー 回答者： iridori_rice 回答日時： 2005/09/06 18:26

ヒントだけにしようかと思いましたが．．．

(1)
Label1.Caption = DateAdd("D", CDbl(Text1.Text), Date)

(2)
Label2.Caption = DateSerial(Year(Date), Month(Date), Day(Date) + CInt(Text1.Text))

この回答へのお礼

ありがとうございました

お礼日時：2005/09/09 19:20

No.3 回答者： Kuppycat 回答日時： 2005/09/07 09:32

＃２の方もおっしゃっていますが、「sysdate」ということはオラクルなのでしょうか？

オラクルの場合なら、
１．select to_char(sysdate + xx, 'yyyy/mm/dd') from dual
２．select to_char(sysdate - xx, 'yyyy/mm/dd') from dual
でyyが返ってくるかと。

No.2 回答者： 1050YEN 回答日時： 2005/09/06 20:49

ん？オラクル？