日期重复提示信息

feibo8228

点击窗口1里的按钮，如果日期框选择的日期与超级列表框里显示的日期有相同的就提示错误，没有相同的就执行下一步

LEOONL

工作量1 - 副本.e (165.78 KB, 下载次数: 4)

2025-1-4 13:57 上传

点击文件名下载附件

afu45

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (超级列表框xsy.取表项数 (), i)
如果真 (超级列表框xsy.取标题 (i － 1, ) ＝ 时间_格式化 (日期框1.今天, “yyyy年M月d日”, , , ))
信息框 (“有一样的”, 0, , )
返回 ()

计次循环尾 ()
调试输出 (“没有一样的”)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (超级列表框xsy.取表项数 (), i)<br />     .如果真 (超级列表框xsy.取标题 (i － 1, ) ＝ 时间_格式化 (日期框1.今天, “yyyy年M月d日”, , , ))<br />         信息框 (“有一样的”, 0, , )<br />         返回 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (“没有一样的”)