请问易语言如何检测今天是不是愚人节？

每年的4月1日就是愚人节！

代码

.版本 2

.子程序 _按钮1_被单击

.局部变量 日, 整数型

.局部变量 月, 整数型

日 ＝ 取日 (取现行时间 ())

月 ＝ 取月份 (取现行时间 ())

.如果 (月 ＝ 4 且 日 ＝ 1)

信息框 (“今天是愚人节”, 0, , )

.否则

信息框 (“今天是：” ＋ 到文本 (月) ＋ “月” ＋ 到文本 (日) ＋ “日”, 0, , )