| 2018/01/16(Tue) 09:37:28 編集(投稿者) 2018/01/15(Mon) 22:27:31 編集(投稿者) 2018/01/15(Mon) 21:28:41 編集(投稿者) 2018/01/15(Mon) 21:27:00 編集(投稿者) 2018/01/15(Mon) 21:23:59 編集(投稿者) 2018/01/15(Mon) 21:23:18 編集(投稿者) 2018/01/15(Mon) 21:12:57 編集(投稿者)
■No10837に返信(Vision Makerさんの記事) > 修正したものをサンプルであげております。
> 名札 メイン > 変数宣言 局所 文字列{&日曜年月日} > * > > 手続き定義開始 cmd日曜年月日Click() > ケース開始 > ケース(#曜日( #日時値 )="月") > &日曜年月日 = #日数加算(&年月日,6) > ケース(#曜日( #日時値 )="火") > &日曜年月日 = #日数加算(&年月日,5) > ケース(#曜日( #日時値 )="水") > &日曜年月日 = #日数加算(&年月日,4) > ケース(#曜日( #日時値 )="木") > &日曜年月日 = #日数加算(&年月日,3) > ケース(#曜日( #日時値 )="金") > &日曜年月日 = #日数加算(&年月日,2) > ケース(#曜日( #日時値 )="土") > &日曜年月日 = #日数加算(&年月日,1) > ケース(#曜日( #日時値 )="日") > &日曜年月日 = #日数加算(&年月日,7) > ケース終了 > メソッド呼び出し @フォーム.再描画() > 手続き定義終了
プロシージャ:cmd日曜年月日Click( )のロジックは、その通りで間違えないですが、似たような記述の繰り返しがミスを誘発しかねません。
このような単調なコピペの繰り返しは、うっかりミスを起こすことがよくあります。
もしも、私だったら、次のように書きますよ。
↓
手続き定義開始 cmd日曜年月日Click( ) 変数宣言 自動,文字列{ &icon, &title = "cmd日曜年月日Click( )", &msg }
変数宣言 自動,文字列{ &dayOfWeek } 変数宣言 自動,文字列{ &dayOfWeekList = "月,火,水,木,金,土,日" }/* 半角コンマで区切ったリスト */ 変数宣言 自動,文字列{ &stringList = "6,5,4,3,2,1,7" }/* 半角コンマで区切ったリスト */ 変数宣言 自動,文字列{ &string } 変数宣言 自動,整数 { &at } 変数宣言 自動,整数 { &addNum }
&dayOfWeek = #曜日( #日時値 ) &at = #対応番号( &dayOfWeekList, &dayOfWeek ) &string = #対応文字列( &stringList, &at ) &addNum = #num( &string )
&日曜年月日 = #日数加算( &年月日, &addNum )
メソッド呼び出し @フォーム.再描画()
手続き定義終了
|