- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
选项按钮组
一、设计表单PLUS01.SCX
1、在TEXT1中输入一个数,在选项按钮组OPTIONGROUP1中选择“加上”或“减去”,按“等于”命令按钮,在TEXT3中显示运算结果;
2、若结果为负数,则以红色显示,否则以蓝色显示。
要点:
将三个文本框的VALUE属性设为0,确保文本框的VALUE值为数值型;
将选项按钮组的VALUE属性设为=[加上],运行表单时默认选中第一项;
编写“等于”命令按钮的CLICK事件代码
IF THISFORM.OPTIONGROUP1.VALUE=[加上]
THISFORM.TEXT3.VALUE=THISFORM.TEXT1.VALUE+THISFORM.TEXT2.VALUE
ENDIF
IF THISFORM.OPTIONGROUP1.VALUE=[减去]
THISFORM.TEXT3.VALUE=THISFORM.TEXT1.VALUE-THISFORM.TEXT2.VALUE
ENDIF
IF THISFORM.TEXT3.VALUE0
THISFORM.TEXT3.FORECOLOR=RGB(255,0,0)
ELSE
THISFORM.TEXT3.FORECOLOR=RGB(0,0,255)
ENDIF
二、设计表单MULTIPLUS.SCX
1、 在TEXT1中输入一个数,利用选项按钮组选择“乘以”或“除以”,在TEXT2中输入另一个数,按“等于”命令按钮,在TEXT3中显示运算结果;
2、如果选择“除以“,且TEXT2中为0,则在TEXT3中显示“错误”。
要点:
将文本框TEXT1,TEXT2的VALUE属性设为0(数值型),则TEXT3的VALUE属性不做设置(字符型);
编写“等于”命令按钮的CLICK事件代码
IF THISFORM.OPTIONGROUP1.VALUE=1
THISFORM.TEXT3.VALUE=STR(THISFORM.TEXT1.VALUE*THISFORM.TEXT2.VALUE,6,2)
ENDIF
IF THISFORM.OPTIONGROUP1.VALUE=2
IF THISFORM.TEXT2.VALUE=0
THISFORM.TEXT3.VALUE=错误
ELSE
THISFORM.TEXT3.VALUE=STR(THISFORM.TEXT1.VALUE/THISFORM.TEXT2.VALUE,5,2)
ENDIF
ENDIF
说明:选项按钮组的VALUE属性可以是字符型,也可以是数值型:初值为字符串就是字符型,初值为数值就是数值型。
三、将上面的两个例子中的选项按钮组改为组合框实现相同的功能
四、设计表单DCNTSJ.SCX,利用JSGL数据库(其中DDM表存放系信息,TEACH表存放教师信息),实现按系统计教师人数。
要点:
将文本框的VALUE属性设为0,确保文本框的VALUE值为数值型;
“统计”按钮的CLICK事件代码:
DO CASE
CASE THISFORM.OPTIONGROUP1.VALUE=电子
XH1=01
CASE THISFORM.OPTIONGROUP1.VALUE=计算机
XH1=02
CASE THISFORM.OPTIONGROUP1.VALUE=机械
XH1=03
ENDCASE
THISFORM.LABEL1.CAPTION=THISFORM. OPTIONGROUP1.VALUE+系教师人数
SELECT COUNT(*) FROM TEACH WHERE 系号=XH1 INTO ARRAY X
THISFORM.TEXT1.VALUE=X(1)
微调器
一、设计表单XSYS.scx,运行界面如下图,编写“更新”按钮的CLICK代码,要求如下:
1)将形状控件SHAPE1的颜色更新为三个微调按钮值所代表的颜色;
2)若三个微调按钮值为255,0,0,将SHAPE1的形状改为正方形(CURVATURE=0)
3)若三个微调按钮值为0,255,0,将SHAPE1的形状改为圆角正方形(CURVATURE=10)
4)若三个微调按钮值为0,0,255,将SHAPE1的形状改为圆形(CURVATURE=99)
“更新”按钮的click事件代码如下:
r=thisform.spinner1.value
g=thisform.spinner2.value
b=thisform.spinner3.value
thisform.shape1.backcolor=rgb(r,g,b)
do case
case r=255 and g=0 and b=0
thisform.shape1.curvature=0
case
您可能关注的文档
- 第二讲导数、微分及其应用学习笔记.doc
- 焊接专业焊接英汉词典学习笔记.doc
- 【金版新学案】2014高考英语一轮总复习课时作业46Module4WhichEnglish外研版选修8.doc
- 国贸实务学习笔记.doc
- 辽宁海事局航海类(甲类)三副英语历届真题第47期学习笔记.doc
- 如何找到做每件事情的最佳时间?学习笔记.doc
- 最新2014职称英语新增文章理工A(最完整,含译文,已排版可直接打印,word版)学习笔记.doc
- 桁架计算(TRUSS)学习笔记.doc
- 课程实验指导五投影学习笔记.doc
- 效率很低的人的习惯学习笔记.doc
- 四川省德阳市罗江中学2025届高三考前热身化学试卷含解析.doc
- 山东省枣庄现代实验学校2025届高三下学期第五次调研考试化学试题含解析.doc
- 吉林省长春市十一高中等九校教育联盟2025届高三一诊考试生物试卷含解析.doc
- 2025届江苏省盐城市伍佑中学高考仿真模拟化学试卷含解析.doc
- 2025届广西贺州中学高考冲刺押题(最后一卷)生物试卷含解析.doc
- 安徽省池州市贵池区2025届高三第一次模拟考试生物试卷含解析.doc
- 宁夏银川一中2025届高三(最后冲刺)化学试卷含解析.doc
- 广东省广州市增城区四校联考2025届高考压轴卷化学试卷含解析.doc
- 2025届邯郸市第一中学高考生物必刷试卷含解析.doc
- 2025届安徽省安庆市石化第一中学高考仿真卷化学试卷含解析.doc
文档评论(0)