搜索
简单应用题第一题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“成绩管理系统”(form1对象的caption属性设置为“成绩管理系统”,在表单设计器界面中点击表单空白处，使表单为当前对象，然后在属性框中设置caption的文本为指定的内容，不要输入引号)，将文本“欢迎使用成绩查询系统”（名称为label1的标签）改为颜色属性值为222,100,50(标签的forecolor属性)，黑体(标签的fontname属性设置为黑体)。最后在表单上添加“关闭”（名称为Command1）命令按钮(Command1命令按钮的caption属性设置为“关闭”)，单击此按钮关闭表单（Command1命令的单击事件程序为：thisform.release）。保存并运行表单。2.打开表单myform002，表单中已有一个标签（名称为label1），按标签要求完成操作。需要建立二个命令按钮“计算”和“关闭”（名称分别为Command1和Command2）(Command1命令按钮的caption属性设置为“计算”，Command2命令按钮的caption属性设置为“关闭”，注意题目中添加多个控件的，要严格按题目说明对应控件的名称关系，否则影响得分)，三个文本框（text1、text2、text3），结果放在text3中，单击“计算”按钮,完成标签要求，单击“关闭”按钮关闭表单（Command2命令的单击事件程序为：thisform.release）。在text1中输入22，在text2中输入36，保存并运行表单。注意把三个文本框按钮的属性value值事先设置为0，使得他们默认接收的数据为数值型，否则无法进行数学计算。其他方法可以处理，但是麻烦些。Command1计算按钮的单击事件程序：thisform.text3.value=thisform.text1.value+thisform.text2.value注意：完成表单设计后要运行表单的所有功能。第二题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”（设置表单的caption），将文本“欢迎您访问系统”（名称为label1的标签）改为25号（设置label1的fontsize）黑体（设置label1的fontname）。最后在表单上添加“关闭”（名称为Command1）命令按钮（Command1命令按钮的caption属性设置为“关闭”），单击此按钮关闭表单（Command1按钮的单击事件程序为：thisform.release）。保存并运行表单。2.打开表单myform002,在表单上已有二个标签按钮（名称为label1和label2）,添加两个命令按钮“计算”和“关闭”（名称分别为Command1和Command2）。一个文本框（名称为text1），一个标签按钮（名称为label3）（1）单击“计算”命令按钮，计算出输入圆半径的圆的面积，圆半径在文本框中输入,圆面积在标签label3中显示。注意text1文本框默认数据类型是文本，需要首先设置其value值为0，这样该文本框把接收的数字符号默认就是数值型了，后面的才可以计算圆面积，计算按钮的单击事件程序为：（caption属性为字符型，所以使用STR函数转换后赋值）thisform.label3.caption=str((thisform.text1.value)**2*pi(),10,2)（2）单击“关闭”命令按钮关闭表单。（关闭按钮的单击事件程序为：thisform.release）注意：完成表单设计后要运行表单的所有功能。第三题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）背景色改为“100,100,200”（单击表单空白处，然后设置表单的backcolor属性），将文本“欢迎您访问系统”（名称为label1的标签）改为20号（设置label1的fontsize）黑体（设置label1的fontname）。最后在表单上添加“关闭”（名称为Command1）命令按钮（Command1命令按钮的caption属性设置为“关闭”），单击此按钮关闭表单（关闭按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,上有两个标签（名称为label1和label2）和两个计时器（名称分别为timer1和timer2）。标签label1的内容为“学生成绩管理系统”（设置标签1的caption），字号为20（设置标签1的fontsize），timer1事件的时间间隔为20毫秒（设置timer1的interval属性值为20），timer2事件的时间间隔为1000毫秒（设置timer2的interval属性值为1000），标签2显示系统时间(设置time2控件的timer事件代码为：thisform.Label2.caption=time())，标签1能够不停的自右向左移动(移动值设置为-2)，当全部移出表单后再由表单右侧重新进入。设置timer1的timer事件代码为：ifthisform.Label1.left0thisform.Label1.left=thisform.Label1.left-2elsethisform.Label1.left=thisform.widthendif注意：完成表单设计后要运行表单的所有功能。类似操作参见课本P222页示例6-19.第四题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”（点击表单空白处，设置其caption属性为“欢迎您”，注意控件的标题caption和名称name不同，前者一般展示在表单界面中，后者一般在程序中使用，相当于变量名字），将文本“成绩处理系统”（名称为label1的标签）改为25号（设置label1的fontsize）、字体颜色为RGB（100,200,100）（设置label1的forecolor）。最后在表单上添加“关闭”（名称为Command1）命令按钮(Command1命令按钮的caption属性设置为“关闭”)，单击此按钮关闭表单(关闭按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,上有两个命令按钮“输出”和“退出”（名称分别为Command1和Command2）(Command1命令按钮的caption属性设置为“输出”，Command2命令按钮的caption属性设置为“退出”)。一个文本框（名称为TEXT1）（注意text1文本框默认数据类型是文本，需要首先设置其value值为0，这样该文本框的值类型默认就是数值型了，后面才可以输入一个表示成绩的数值）,一个标签（名称为label1）。（1）单击“输出”命令按钮，文本框中输入的学生成绩的等级（在标签中显示），等级划分为：不及格（小于60）、及格（大于等于60小于70）、良好（大于等于70小于90）、优秀（大于等于90）,输入其它值则显示“输入错误”。输出按钮Command1的单击事件程序为：fs=thisform.text1.valuelcaption=iffs100orfs0thenlcaption=输入错误elseiffs60thenlcaption=不及格elseiffs70lcaption=及格elseiffs90lcaption=良好elselcaption=优秀endifendifendifendifthisform.label1.caption=lcaption（2）单击“退出”命令按钮关闭表单(退出按钮的单击事件程序为：thisform.release）。注意：完成表单设计后在文本框中输入65，运行表单的所有功能。第五题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“考试系统”（点击表单空白处，设置其caption属性为“考试系统”），将文本“进入考试系统”（名称为label1的标签）改为20号黑体（设置label1的fontsize属性）。最后在表单上添加“关闭”（名称为Command1）命令按钮（设置其caption属性为“关闭”），单击此按钮关闭表单（退出按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,表单上有一个标签“请输入密码”（在新建的表单上添加一个标签控件，设置其caption属性为“请输入密码”)和一个文本框（名称分别为label1和text1）。输入密码时文本框中显示“*”(设置文本框控件text1的passwordchar属性为*，设置其controlsource属性为newpassword)，输入错误显示提示信息“密码输入不正确，第几次输入失败！”,三次输入不正确时，则显示提示信息“对不起，您不是合法用户！”，输入密码正确，则显示“密码正确，进入系统！”，然后结束表单运行。（inputnumber存放输入次数，oldpassword=123,newpassword存放输入密码注意：完成表单设计后要运行表单的所有功能。建立新表单，保存表单文件名字为myform002，设置表单的initevent事件代码如下:publicinputnumber,oldpassword,newpasswordinputnumber=0oldpassword='123'newpassword=''文本框控件text1的validevent事件代码为：ifnewpassword!=oldpasswordinputnumber=inputnumber+1=messagebox('密码输入不正确，第'+str(inputnumber,1)+'次输入失败')ifinputnumber3newpasssword=''this.value=''thisform.refreshreturn.f.else=messagebox('对不起，您不是合法用户！')releaseinputnumber,oldpassword,newpasswordthisform.releaseendielsemessagebox('密码正确，进入系统！')releaseinputnumber,oldpassword,newpasswordthisform.releaseendi程序中设定的原始密码为123，运行时输入完成后直接回车即可。可参见课本P195例6-4第六题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”，将文本“欢迎您访问系统”（名称为label1的标签）改为25号。标签背景色改为100,80,200，最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002,表单上有两个命令按钮“计算”和“退出”（名称分别为Command1和Command2），二个标签（名称为label1，内容为“输入数据”；名称为label2，显示结果），一个文本框（名称为text1，在此输入数据）。单击“计算”命令按钮，计算出该数据之内所有奇数的和（该数据为自然数）。（2）单击“退出”命令按钮关闭表单。注意：完成表但设计后输入1000运行表单的所有功能1.text1文本框默认数据类型是文本，需要首先设置其value值为0，这样该文本框的值类型默认就是数值型了，后面才可以输入一个表示成绩的数值.其他控件设置属性参照前面的例子。2.Label2控件的尺寸设置的稍微大一些，以便清楚的显示结果，或者把标签控件的autosize属性设置为.T.。计算按钮的单击事件程序代码如下:s=0fori=1tothisform.text1.values=s+ii=i+1endforthis