简单应用题参考Word文件下载.docx
- 文档编号:22855065
- 上传时间:2023-02-05
- 格式:DOCX
- 页数:33
- 大小:492.44KB
简单应用题参考Word文件下载.docx
《简单应用题参考Word文件下载.docx》由会员分享,可在线阅读,更多相关《简单应用题参考Word文件下载.docx(33页珍藏版)》请在冰豆网上搜索。
B=VAL(THISFORM.TEXT2.VALUE)
P=A
S=0
DOWHILEP<
=B
ifint(p/2)<
>
P/2
S=S+P
ENDIF
P=P+1
ENDDO
THISFORM.TEXT3.VALUE=STR(S)
二.在考生文件夹下完成如下简单应用:
1.新建表单myform001,把表单(名称为Form1)标题改为“系统登录”,在表单上添加四个标签控件Label1、Label2、Label3、Label4,Label1的显示文本为“欢迎您访问系统”,其字体为黑体,25磅字,Label2的显示文本为“用户名”,Label3的文本为“用户密码”;
一个组合框控件Combo1,并用属性窗口为Combo1添加列表项内容“苗莉”、“林文玲”;
一个文本框控件Text1,用于输入用户密码,两个命令按钮Command1、Command2,其标题文字分别为“登录”和“关闭”。
当从列表中选择用户名称时,在Label4中显示“您选择了:
”及相应的用户名,然后在文本框Text1输入用户密码“111111”,并单击“登录”按钮时,显示消息“登陆成功”;
单击“关闭”按钮则结束表单的运行。
除Label1以外其他字体选择隶书,14磅字。
(修改COMBO1的属性ROWSOURCETYPE为1-值,在ROWSOURCE中输入“苗莉,林文玲”,在COMBO1的INTERACTIVECHANGE事件代码窗口中输入“THISFORM.LABEL4.CAPTION="
您选择了:
+THISFORM.COMBO1.VALUE”,在登录按钮的click事件代码窗口中输入:
ifTHISFORM.TEXT1.VALUE="
111111"
=MESSAGEBOX("
登陆成功"
)
thisform.release)
2.打开表单myform002,表单中已有二个标签(名称为Label1、Label2),三个文本框(名称为Text1、Text2、Text3),二个命令按钮,(名称分别为Command1、Command2),其标题文字分别为“计算”和“关闭”。
具有如下功能:
(1)在文本框Text1、Text2中分别输入一个三位的自然数,且Text2中的数大于Text1中的数据,当单击“计算”按钮时,计算在这两个自然数之间满足各数字之和为10的数的和,并将计算结果显示在文本框Text3中;
(2)在表单中增加一个“重置”按钮,重置按钮字体、字号同“计算”按钮,单击该命令按钮时,三个文本框的内容均清空,单击“关闭”按钮结束表单的运行。
请在“计算”命令按钮的单击事件代码窗口中将“?
”删除,并输入正确的语句,其他事件代码根据要求的功能自己独立完成添加。
(1)修改程序代码时不能添加或删除代码行。
(2)完成表单设计后要运行表单的所有功能。
A=VAL(THISFORM.TEXT1.VALUE)
P=A
DOWHILEP<
C=INT(P/100)
D=INT(p/10)-INT(P/100)*10
E=P-INT(P/10)*10
ifC+D+E=10
THISFORM.TEXT3.VALUE=STR(S)
三.在考生文件夹下完成如下简单应用:
1.新建表单myform001,表单(名称为Form1)标题为“成绩管理系统”,建立三个标签控件(名称为Label1、Label2、Label3,其标签文字为“学号”、“姓名”和“VFP成绩”)、三个文本框控件(名称为Text1、Text2、Text3,用于接收输入值)和两个命令按钮控件(名称为Command1和Command2,按钮的标题文本分别为“确定”和“退出”),标签文字和命令按钮标题字体设置为隶书,16磅,界面设计如下图所示。
文本框Text3设置一个When事件(Text3初始值通过属性Value设置为120),当其中数据在0~100之间,则不允许对其进行编辑,并显示信息“数据正常,不允许编辑”,退出按钮设置一个鼠标单击事件,当单击退出时,结束表单的运行。
(3)完成表单设计后要运行表单的所有功能。
(在text3的when事件代码窗口中输入:
IFTHISFORM.TEXT3.VALUE>
=0ANDTHISFORM.TEXT3.VALUE<
=100
数据正常,不允许编辑"
RETURNTHISFORM.TEXT3.VALUE<
0ORTHISFORM.TEXT3.VALUE>
100
在退出按钮的click事件代码窗口中输入:
2.打开表单myform002,其中已经添加两个名称分别为Label1和Label2的标签和一个定时器Timer1,标签Label1的标题为“学生成绩管理系统”。
(1)将标签Label1的字体设置为“黑体”,字号为20,颜色为RGB(255,0,0),其他控件的字体为隶书,字号为20。
(2)将Timer1控件的事件代码中“?
”位置改成正确的代码,并设置Timer1的相应属性,保证每隔20毫秒,标签Label1能够不停的自右向左移动(移动值设置为-2),标签左边沿移至表单左边沿后,则标签左边距设置为表单宽度。
(3)添加名为Timer2的定时器控件,并编写相应的代码,保证每隔1秒在标签Label2中显示当前系统时间。
(4)添加一个“退出”按钮,单击此按钮,则退出表单的运行。
界面设计如下图所示:
(Timer1控件的事件代码修改如下:
IFTHISFORM.LABEL1.LEFT>
0
THISFORM.LABEL1.LEFT=THISFORM.LABEL1.LEFT-2
ELSE
THISFORM.LABEL1.LEFT=THISFORM.width
ENDIF
Timer2控件的事件代码为:
THISFORM.LABEL2.CAPTION=TIME()
命令按钮退出的代码为:
THISFORM.RELEASE
四.在考生文件夹下完成如下简单应用:
1.新建表单myform001,把表单(名称为Form1)标题改为“编辑框中的字符数”,表单的背景色为RGB(0,100,200),表单中有三个标签(Label1、Label2、Label3),其标签文字分别为“姓名”、“履历”、“履历字数”,两个文本框(Text1、Text2),Text1用于输入姓名,Text2用于显示履历字数,一个编辑框(Edit1),在编辑框中通过属性窗口输入“1976年参加工作,1985年任科长,1999年任处长”,两个命令按钮(Command1、Command2),按钮标题文本分别为“统计字数”和“退出”,所有文字均采用隶书,字号为16,界面设计如下图所示:
编写代码,完成如下功能:
当单击“统计字数”按钮时,编辑框Edit1获得焦点并选定其中的所有文字,文本框Text2中显示编辑框中的字符数,但不可编辑,单击“退出”按钮,则结束表单的运行。
(在编辑框的VALUE属性中输入“1976年参加工作,1985年任科长,1999年任处长”,修改TEXT2的ENABLED属性为.F.,在统计字数按钮的click事件代码中输入:
THISFORM.EDIT1.SETFOCUS()
THISFORM.EDIT1.SELSTART=0
THISFORM.EDIT1.SELLENGTH=LEN(ALLTRIM(THISFORM.EDIT1.VALUE))
THISFORM.TEXT2.VALUE=THISFORM.EDIT1.SELLENGTH
在退出按钮的click事件代码中输入:
2.打开表单myform002,表单中有两个命令按钮“输出”和“退出”(名称分别为Command1和Command2);
二个文本框(名称分别为Text1、Text2),五个标签(名称分别为Label1、Label2、Label3、Label4、Label5)。
(1)在文本框Text1中输入姓名(不能为空,用valid事件设定),在Text2中输入学生成绩,当单击“输出”按钮时,在标签Label5中显示等级,格式为“姓名”+“的等级为”+等级,其中等级的划分为:
不及格(大于等于0且小于60)、合格(大于等于60且小于90)、优秀(大于等于90且小于等于100),输入的成绩只能在0-100之间,否则显示“输入错误”。
请按上述要求,在“输出”命令按钮的单击事件代码中将?
处改成正确的内容,保证实现上述功能。
(2)编写代码,单击“退出”命令按钮时关闭表单。
表单运行示例如下:
(1)完成表单设计后要运行表单的所有功能。
(2)修改程序代码时不能添加或删除代码行。
(在TEXT1的valid事件代码中输入:
RETURNLEN(ALLTRIM(THISFORM.TEXT1.VALUE))<
修改输出按钮代码如下:
cj=val(thisform.text2.value)
docase
casecj>
=0ANDCJ<
60
thisform.label5.caption=thisform.TEX1.VALUE+"
的等级为不及格"
=60andcj<
90
thisform.label5.caption=thisform.TEX1.VALUE+"
的等级为合格"
=90andcj<
的等级为优秀"
OTHERWISE
thisform.label5.caption="
输入错误"
endcase
退出按钮的click代码为:
五.在考生文件夹下完成如下简单应用:
1.新建表单myform001,把表单(名称为Form1)标题改为“记录输入”,表单中有四个标签(名称分别为Label1、Label2、Label3、Label4),其标题文字分别为“学号”、“姓名”、“性别”、“成绩”,四个文本框(名称分别为Text1、Text2、Text3、Text4),一个选项按钮组(Optiongroup1),其中包含两个选项按钮,其标题文字分别为“男”和“女”,当单击某个选项按钮时,文本框Text3中显示性别“男”或“女”,两个命令按钮(名称分别为Command1、Command2),按钮标题文字分别为“输入”和“退出”,当单击“输入”按钮时,清空所有文本框的值,单击“退出”按钮时关闭表单,所有文字均采用隶书,字号为16,界面设计如下图所示:
(在选项按钮组中分别设置选项按钮1和2的click事件代码为:
thisform.TEXT3.VALUE="
男"
;
女"
在命令按钮输入的click事件代码中输入:
THISFORM.TEXT4.VALUE="
在命令按钮退出的click事件代码中输入:
Thisform.RELEASE
2.打开表单myform002,表单中有两个命令按钮(名称分别为Command1和Command2),其标题文本分别为“输出”和“退出”。
五个文本框(名称分别为Text1、Text2、Text3、Text4、Text5),两个标签(名称分别为Label1、Label2),要求在五个文本框中分别输入数据长度不超过10位的五个数,当单击“输出”按钮时,在标签Label2中显示由大到小排序的结果,其字体显示为红色(RGB(255,0,0)),字体颜色在属性窗口设定。
(1)请将“输出”按钮Click事件代码中的“?
”改成正确的内容,以实现上述功能。
(2)编写代码,单击“退出”按钮时关闭表单。
表单运行效果示例如下:
(1)完成表单设计后要运行表单的所有功能。
(2)修改程序代码时不能添加或删除代码行。
(“输出”按钮Click事件代码修改为:
dimensionx(5)
thisform.label2.caption="
fori=1to5
p="
thisform.text"
+str(I,1)+"
.value"
x(i)=val(&
p)
endfor
fori=1to4
forj=i+1to5
ifx(i)<
x(j)
t=x(i)
X(I)=X(j)
X(j)=t
endif
fori=1to5
thisform.label2.caption=thisform.label2.caption+str(x(i))
“退出”按钮Click事件代码为:
六.在考生文件夹下完成如下简单应用:
1.新建表单myform001,在表单上建立三个标签(Label1、Label2、Label3),标签的标题分别为“学号”、“姓名”和“性别”,三个文本框(Text1、Text2、Text3),四个复选框(Check1、Check2、Check3、Check4),复选框的文字分别为“足球”、“篮球”、“排球”和“象棋”,一个列表框(List1),一个命令按钮(Command1),按钮的标题为“退出”,所有字体采用隶书,16号字,表单设计图如下所示:
要求编写程序,当任一复选框的状态改变时,在列表框List1中显示全部复选框的标题文字内容;
当单击“退出”按钮时结束表单的运行。
提示:
在表单的Init事件中设置数组变量X为公共变量,在每个复选框的InteractiveChange事件中使用数组x,刷新表单列表框List1的内容。
完成表单设计后运行表单的所有功能。
(在表单的INIT事件中输入:
publicx
dimeX(4)
FORI=1TO4
X(I)="
ENDFOR
每个复选框的InteractiveChange事件代码分别为:
IFTHISFORM.CHECK1.VALUE=1
X
(1)="
足球"
THISFORM.REFRESH
IFTHISFORM.CHECK2.VALUE=1
X
(2)="
篮球"
else
x
(2)="
IFTHISFORM.CHECK3.VALUE=1
X(3)="
排球"
x(3)="
IFTHISFORM.CHECK4.VALUE=1
X(4)="
象棋"
x(4)="
列表框的rowsourcetype属性为5-数组,rowsource属性为:
x
退出按钮的代码为:
2.打开表单myform002,表单上有两个标签(Label1、Label2),三个文本框(Text1、Text2、Text3),其中文本框Text3的字体为楷体,20号字,颜色为RGB(0,255,0)(需自行设置,在属性窗口设置),两个命令按钮(Command1、Command2),其标题文字分别为“计算”和“退出”。
(1)修改程序中已有的代码,将“?
”替换为正确的内容,保证程序具有以下功能:
在Text1和Text2中分别输入一个自然数,且Text2中输入的数要大于Text1中的数,当单击“计算”按钮时,计算出这两个自然数之间所有素数的和,并将结果显示在Text3中;
(2)编写代码,当单击“退出”按钮时,则结束表单的运行。
(修改计算按钮的click代码如下:
a=val(thisform.text1.value)
b=val(thisform.text2.value)
fori=atob
forj=2toi-1
ifint(i/j)=i/j
EXIT
ifI=J
s=s+i
thisform.text3.value=int(s)
七.在考生文件夹下完成如下简单应用:
1.新建表单myform001,在表单中新建四个标签(Label1、Label2、Label3、Label4),其标题文字分别为“学号”、“姓名”、“性别”和“成绩”,新建四个文本框(Text1、Text2、Text3、Text4),新建一个列表框(List1),一个命令按钮(Command1),标签、列表框和命令按钮字体采用隶书,16号字,表单设计图如下:
当双击列表框时,在列表框中列表显示输入的学号、姓名、性别和成绩,(在表单的init事件中设置公共数组变量x,数组包含4个变量),单击“退出”按钮,则结束表单的运行。
(在表单的init事件代码中输入:
PUBLICX
DIMEX(4)
修改列表框的rowsourcetype的属性为5-数组,rowsource属性为X
在列表框的dblclick事件代码中输入:
X
(1)=THISFORM.TEXT1.VALUE
X
(2)=thisform.text2.value
x(3)=THISFORM.TEXT3.VALUE
X(4)=THISFORM.TEXT4.VALUE
2.打开表单myform002,在表单中有四个标签(Label1、Label2、Label3、Label4),四个文本框(Text1、Text2、Text3、Text4),两个命令按钮(Command1、Command2),其标题文字分别为“统计”和“退出”。
要求在文本框Text1中输入长度大于6的字符串内容(若长度不大于6,焦点不能离开Text1),当单击“统计”按钮时,分别统计“字符”、“数字”和“其他”的个数,并将结果分别显示在文本框Text2、Text3、Text4中,显示的字体颜色分别为RGB(255,0,0)、RGB(0,255,0)、RGB(0,0,255)。
表单运行示例图如下:
请根据以上要求,将命令按钮Command1的Click事件代码中的“?
”改成正确的内容,并编写代码完善整个程序功能。
(2)修改程序代码时不能增加或删除行。
(原题中缺少统计按钮的click事件代码,代码如下:
C=0
D=0
E=0
a=ALLTRIM(thisform.text1.value)
b=LEN(A)
fori=1tob
ch=SUBSTR(A,I,1)
DOCASE
CASEch>
="
a"
andch<
z"
ORch>
A"
Z"
C=C+1
0"
9"
D=D+1
otherwise
e=e+1
ENDCASE
thisform.text2.value=str(C,3)
thisform.text3.value=str(D,3)
thisform.text4.value=str(E,3)
TEXT1的valid事件代码为:
eturnLEN(ALLTRIM(THISFORM.TEXT1.VALUE))>
=6
退出按钮的click事件代码为:
八.在考生文件夹下完成如下简单应用:
1.新建表单myform001,表单(名称为Form1)的标题为“求余数”,添加两个命令按钮“求余数”和“退出”(名称分别为Command1和Command2),三个标签(名称分别为Label1、Label2、Label3),标题为“被除数”
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 简单 应用题 参考