Opuscule: オンラインソフト



ユーティリティ関数集:BarnDance Vol.1


 厳密には、これは「オンラインソフト」ではありません。
 俺が作ったユーティリティ関数です。
 はっきり言って、大した処理ではありません。それぞれが数行の関数で、作ろうと思えば、30分もかからないでしょう。しかし、しょっちゅう使う関数なので、新しいアプリに取りかかる度に作るのも馬鹿馬鹿しい…というようなのをアップして行こうと思います。
 このシリーズでは、原則的に著作権も主張しません。まぁ、その程度のものだってことですが。

 第1弾は、日付処理。

Function Tomorrow(dt As Date) As Date 指定した日の翌日を得る
Function Yesterday(dt As Date) As Date 指定した日の前日を得る
Function DaysAfter(dt As Date, nDays As Integer) As Date 指定された日の数日後を得る
Function DaysBefore(dt As Date, nDays As Integer) As Date 指定された日の数日前を得る
Function NextWeek(dt As Date) As Date 指定された日の1週間後を得る
Function LastWeek(dt As Date) As Date 指定された日の1週間前を得る
Function WeeksAfter(dt As Date, nWeeks As Integer) As Date 指定された日の数週後を得る
Function WeeksBefore(dt As Date, nWeeks As Integer) As Date 指定された日の数週前を得る
Function NextMonth(dt As Date) As Date 指定された月の翌月を得る
Function LastMonth(dt As Date) As Date 指定された月の前月を得る
Function MonthsAfter(dt As Date, nMonths As Integer) As Date 指定された月の数ヶ月後を得る
Function MonthsBefore(dt As Date, nMonths As Integer) As Date 指定された月の数ヶ月前を得る
Function NextYear(dt As Date) As Date 指定された日の翌年同日を得る
Function LastYear(dt As Date) As Date 指定された日の前年同日を得る
Function YearsAfter(dt As Date, nYears As Integer) As Date 指定した日の数年後を得る
Function YearsBefore(dt As Date, nYears As Integer) As Date 指定した日の数年前を得る
Function EndOfMonth(dtSrc As Date) As Date 当月の月末を得る
Function IsEndOfMonth(dt As Date) As Boolean 当日が月末かどうか調べる
Function IsLeapYear(y As Integer) As Boolean
Function IsLeapYearStrict(y As Integer) As Boolean
指定した年が閏年かどうか調べる

 なお、ドキュメントはありません。.bas ファイル1本です。



 ダウンロードの前に、以下の点を確認してください。

"BarnDance" の作成者
O友(omot.otomo@nifty.ne.jp)
"BarnDance" の対象開発言語
Microsoft Visual Basic Version 5.0
"BarnDance" の権利
 BarnDance は、著作権フリーのユーティリティ関数集です。以下に挙げる条件をお守りいただく限り、再配布・転載は自由です。
1. 他ネット、雑誌などの他のメディアへの転載や紹介に際しては、事前に作成者に電子メールで詳細を通知、許可を得ること。
2. 営利目的に使用しないこと。
3. 実費を越える金額の授受を伴わないこと。
4. 中身、タイムスタンプなど、一切変更を加えないこと。
5. 作成者が「O友(omot.otomo@nifty.ne.jp)」であることを明記すること。

 なお、プログラム開発のための再利用には一切、制限・条件はありません。
免責事項
1. 作成者は、"BarnDance" の使用により生じた結果に関して、一切の責を負わない。
2. 作成者は、"BarnDance" 及びそのドキュメントに不備があった場合でも修正・訂正の義務は負わない。
3. 作成者は、"BarnDance" 及びそのドキュメントに関する質問に答える義務は負わない。



 これまでの件についてご了解いただいたものとします。
 では、どうぞ。

BarnDance Vol.1  BDDTIME.LZH  98/08/15  1,592 bytes  [Download]





"Opuscule" のページに戻る
ホームページに戻る

omot.otomo@nifty.ne.jp(O友)