プログラミング（その７：作った関数gmodを使ってみよう。）

prog5のプログラムに作った関数gmodを使ってプログラムを変更してみよう。
次のようにプログラムを直します。

�@　　　　function　 prog7(n as integer) as variant
�A　　　　　dim ri as integer
　　　　　　dim wk as variant 　　　　　　　　　　　　　　　

�B　　　　　wk="月火水木金土日"
�C　　　　　ri = gmod(n,7) 　　　　　　　　　'←　n mod 7
�D　　　　　prog7=mid(wk,ri+1,1)
�E　　　　end function


�C行目の n mod 7 を　gmod(n,7) のように書き改めます。