码迷,mamicode.com
首页 > 其他好文 > 详细

e4a 对话框的 多选单选颜色日期时间

时间:2019-11-30 11:40:31      阅读:190      评论:0      收藏:0      [点我收藏+]

标签:时间   输入框   net   文本   按钮   对话   你好   背景颜色   初始   

事件 按钮1.被单击()‘单选 
‘声明变量
变量 项目 为 文本型(4)
变量 状态 为 逻辑型(4)
变量 结果 为 文本型
‘定义项目内容
项目(0)="你好帅啊"
项目(1)="你好酷啊"
项目(2)="你好炫啊"
项目(3)="你好拽啊"
‘定义项目选中状态
状态(0)=假
状态(1)=真
状态(2)=假
状态(3)=假
‘显示对话框直到返回选择结果
结果 = 单选对话框("单选对话框",项目,状态)
弹出提示(结果)
结束 事件

事件 按钮2.被单击()‘多选
‘声明变量
变量 项目 为 文本型(4)
变量 状态 为 逻辑型(4)
变量 结果 为 文本型
‘定义项目内容
项目(0)="你好帅啊"
项目(1)="你好酷啊"
项目(2)="你好炫啊"
项目(3)="你好拽啊"
‘定义项目选中状态
状态(0)=假
状态(1)=真
状态(2)=假
状态(3)=真
‘显示对话框直到返回选择结果
结果 = 多选对话框("多选对话框",项目,状态)
弹出提示(结果)
结束 事件

事件 按钮3.被单击()‘日期
显示日期选择框()
结束 事件

事件 按钮4.被单击()‘时间
显示时间选择框()
结束 事件

事件 主窗口.日期框被选择(日期 为 文本型)
弹出提示(日期)
结束 事件

事件 主窗口.时间框被选择(时间 为 文本型)
弹出提示(时间)
结束 事件

事件 按钮5.被单击()‘输入
变量 输入结果 为 逻辑型
变量 输入内容 为 文本型
输入内容 = 输入框("请输入任意字符","初始内容",输入结果)
如果 输入结果 = 真 则
弹出提示("你输入了:" & 输入内容)
否则	
弹出提示("你取消了输入" )
结束 如果
结束 事件

事件 按钮6.被单击()‘颜色选择
标签1.背景颜色 = 颜色选择框("点击圆心确定颜色",标签1.背景颜色)
结束 事件

  

e4a 对话框的 多选单选颜色日期时间

标签:时间   输入框   net   文本   按钮   对话   你好   背景颜色   初始   

原文地址:https://www.cnblogs.com/--3q/p/11961444.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!