日付から曜日を取得するサンプルコードを記載します。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 |
Kf(_dayweek){ Pe{ /*キーステーションが最初に実行するキーセット*/ N(_main); } } K(_main){ Se{ @s1{ /*Cキーに対してスタイルを設定*/ ~key="C"{ ~border{ ~style="solid"; } } } } U(@s1){ R(#row1){ C(#source,"2018/11/20"){ } C(#dayofweek){ } } Pe{ (long)row1Ticks = toTicks(#row1#source?); (int)daynum1 = sub(#dayweek,year(row1Ticks),month(row1Ticks),day(row1Ticks)); if(daynum1 == 0){ #row1#dayofweek?="日曜日"; }elseif(daynum1 == 1){ #row1#dayofweek?="月曜日"; }elseif(daynum1 == 2){ #row1#dayofweek?="火曜日"; }elseif(daynum1 == 3){ #row1#dayofweek?="水曜日"; }elseif(daynum1 == 4){ #row1#dayofweek?="木曜日"; }elseif(daynum1 == 5){ #row1#dayofweek?="金曜日"; }elseif(daynum1 == 6){ #row1#dayofweek?="土曜日"; } } X /* 日曜を起点とする0から0の整数を返す */ Pe((int)#dayweek,(int)year,(int)month,(int)day) { if (month < 3) { month = 12 + month; year = year - 1; } return(mod(year+year/4-year/100+year/400+floor(2.6*month+1.6)+day, 7)); } } } |
dayweek.ksf 1.18 KB
実行結果
