- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
表单按标签文本框的练习
请完成以下练习,将最后得到的学生成绩.scx,阶乘.scx,系统登陆.scx三个表单文件压缩为rar文件,并以自己学号命名该rar文件,提交至ftp。
ftp提供有上机文件夹.rar,下载到本地机器后解压缩(解压到当前文件夹)。然后,将vf的默认路径设置到解压得到的上机文件夹中,以上三个表单文件建立之后也可从该文件夹中找到。
在上机文件夹下有一个学生管理数据库,包括学生student、课程course、成绩sc三个表.
在表单向导中选取一对多表单向导建立表单.
要求:从父表学生student中选取字段学号和姓名,从子表成绩sc中选取字段课程号和成绩,表单样式选“浮雕式”,按钮类型选“文本按钮”,按学号降序排序,表单标题为“学生成绩”,选择“保存并运行表单”,完成并将表单保存为学生成绩.scx
创建一个表单阶乘.scx完成N阶乘和的计算的功能(用表单设计器)。
要求:
控件类型
控件名称
属性设置
Command
Command1
fontsize
12
caption
计算
Command2
fontsize
12
caption
退出
Text
Text1
Fontsize:12
Text2
Fontsize:12
Label
Label1
caption
阶乘求和
autosize
.T.
backstyle
0-透明
fontsize
16
forecolor
橘色
Label2
Caption
请输入n值:
autosize
.T.
backcolor
白色
fontsize
16
forecolor
橘色
Label3
Caption
累加结果:
autosize
.F.
backcolor
白色
fontsize
16
forecolor
橘色
尺寸
与label2等大小(使用布局调整)
Form
Form1
Backcolor
绿色
设计后表单界面如图所示:
双击command1,打开事件代码编辑窗口,确认对象名为Command1,事件为click事件,输入如下内容:
s=0
p=val(thisform.text1.value)
t=1
for n=1 to p
t=t*n
s=s+t
endfor
thisform.text2.value=s
thisform.text1.value=
同上,为Command2的click事件输入以下代码内容:
Thisform.release
保存表单并命名为阶乘.scx。
运行表单,输入一个n值单击计算按钮看结果。
3. 表单、标签、命令按钮的练习
创建一个表单,名为 系统登陆.scx。(用表单设计器)
(1)要求给表单定义如下属性:
Caption:学生信息管理系统
Width:405 autocenter: .t.
Alwaysontop: .t.
picture:(从电脑上选背景图片)或用backcorlor设置背景色
Maxbutton: .f. minbutton: .f.
(2)添加第一个标签属性如下:
Caption:学生信息管理系统 forecolor:红色
Autosize: .t. fontname: 华文隶书
Fontsize:26 backstyle:0—透明
Name:lab1
(3)再添加两个标签属性如下:
Caption:用户名 ,密码
Name:lab2 ,lab3
lab2和lab3垂直排列、左对齐
(4)在lab2和lab3右边分别添加文本框text1和text2,属性如下:
Text2的passwordchar设置为*
(5)添加三个命令按钮command1、command2和command3,
按钮标题caption分别为确定, 取消,退出.
设置command1的click事件为:
if thisform.text1.value=admin and thisform.text2.value=admin
运行表单时:用户名和密码都用admin即可登陆成功
messagebox(登录成功,0)
else
messagebox(用户名或密码有误,请重新输入,0)
endif
设置command2的click事件为:
thisform.text1.value=
thisform.text2.value=
thisform.text1.setfocus
焦点回到文本框text1,等待重新输入
设置command3的click事件为:
thisform.release
保存表单并命名为系统登陆.scx。
运行表单,输入正确的用户名
您可能关注的文档
最近下载
- 超深层页岩气压裂技术攻关进展与发展建议.pptx VIP
- 川南深层页岩气压裂技术进展与展望.pdf VIP
- 2025云南昆明供电局项目制用工招聘48人笔试备考题库及答案解析.docx VIP
- 人教版部编版四年级语文上册《观潮》课件.ppt VIP
- 2024年华医网医学继续教育答案三套整合.docx VIP
- 2025凉山州继续教育公需科目满分答案-AI+职场:AI公文写作高效进阶实战.docx VIP
- 【一流】全新2025年义务教育初中历史课程标准(共35).docx VIP
- 航空油料计量统计员职业技能鉴定中级考试题(附答案).doc VIP
- 2025江苏苏州市昆山高新集团有限公司选聘子企业负责人1人笔试参考题库附答案解析.docx VIP
- 含氯消毒液配置操作考核及评分标准(可编辑).pdf VIP
文档评论(0)