VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/01/11(Tue) 20:45
投稿者LESIA
Eメール
URL
タイトルRe^5: 入力した西暦間のうるう年の回数をカウントするプログラムを作りたい

> 早速ありがとうございます。step1とStep Sgn(Text2 - Text1)の違いは何でしょう?
> 調べてみます。

Text1 < Text2 の時、Sgn(Text2 - Text1) = 1となるので
For seireki = Text1 To Text2 Step 1
で、小さい西暦から大きい西暦まで1ずつ増やしながらループします。

Text1 > Text2 の時、Sgn(Text2 - Text1) = -1となるので
For seireki = Text1 To Text2 Step -1
で、大きい西暦から小さい西暦まで1ずつ減らしながらループします。

ただし、Text1 = Text2の時は、Sgn(Text2 - Text1) = 0 となるので
要注意です。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -