|
本帖最后由 h202 于 2025-3-17 16:46 编辑
如何实现两个日历框,选择第一个后第二个日历框会选择前一天日期(只选择周一至周五,避开周末)?
<火山程序 类型 = "通常" 版本 = 1 />
方法 日历框_日期被选择 <接收事件 类型 = 整数 注释 = "当该日历框的任意日期被单击,即触发本事件.">
参数 来源对象 <类型 = 日历框 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
参数 年 <类型 = 整数 注释 = "返回一个年份整数,例如:2018">
参数 月 <类型 = 整数 注释 = "返回一个月份整数,例如:1" "">
参数 日 <类型 = 整数 注释 = "返回日的整数,例如:19">
{
变量 日历信息 <参考 类型 = 日历信息类>
如果 (来源对象 == 日历框1)
{
前一天历史编辑框.内容 = 到文本 (年) + "年" + 到文本 (月) + "月" + 到文本 (日) + "日"
}
如果 (来源对象 == 日历框0)
{
年份编辑框.内容 = 到文本 (年) + "年"
当时历史编辑框.内容 = 到文本 (年) + "年" + 到文本 (月) + "月" + 到文本 (日) + "日"
日历信息.创建 (年, 月, 日-1)
如果 (日历信息.是否为周末 == 真)
{
提示框 ("周末")
}
}
返回 (0)
}
|
|