简单应用(参考)_第1页
简单应用(参考)_第2页
简单应用(参考)_第3页
简单应用(参考)_第4页
简单应用(参考)_第5页
已阅读5页,还剩19页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、简单应用(注意本题中所有代码在原题中不提供)(一) 简单应用(15分)打开表单myform002,表单中已有一个标签(名称为Label1),二个命令按钮“计算”和“关闭”(名称分别为Command1和Command2),三个文本框(名称分别为Text1、Text2、Text3),要求完成以下功能:1. 在Text1、Text2中分别输入一个自然数(要求用文本框事件代码设定,设计时不使用属性,当不满足要求时,光标不能离开该文本框),且Text2中的自然数大于Text1中的自然数(不用代码设定),当单击“计算”按钮时,求出两个自然数之间奇数的和,并将结果显示在文本框Text3中。2. 在表单中增加

2、一个“重置”按钮,其字体和字号同其他命令按钮,当单击“重置”按钮时,三个文本框均清空。3. 单击“关闭”按钮时结束表单的运行。界面设计如下图所示。需要完成的操作如下:1. 请将“计算”命令按钮单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。(练习题中该事件中无代码)2. 按要求完成“重置”按钮和“关闭”按钮的事件代码,两个文本框的事件代码。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.TEXT1.VALUE=""THISFORM.TEXT2.VALUE=""THISFORM.TEXT3

3、.VALUE=""在关闭按钮的click事件代码窗口中输入:THISFORM.RELEASE修改计算按钮的click事件代码如下:A=VAL( THISFORM.TEXT1.VALUE )B=VAL(THISFORM.TEXT2.VALUE)P= AS=0DO WHILE P<= Bif int(p/2) <> P/2S=S+PENDIFP=P+1ENDDOTHISFORM.TEXT3.VALUE =STR(S)TEXT1的valid事件代码如下:RETURN VAL(THISFORM.TEXT1.VALUE)>=0 AND VAL(THISFORM

4、.TEXT1.VALUE) =INT(VAL(THISFORM.TEXT1.VALUE)TEXT2的valid事件代码如下:RETURN VAL(THISFORM.TEXT2.VALUE)>=0 AND VAL(THISFORM.TEXT2.VALUE) =INT(VAL(THISFORM.TEXT2.VALUE)(二) 简单应用(15分)打开表单myform002,表单中已有一个标签(名称为Label1),三个文本框(名称为Text1、Text2、Text3),二个命令按钮(名称分别为Command1、Command2),其标题文字分别为“计算”和“关闭”。要求完成如下功能:1. 在文

5、本框Text1、Text2中分别输入一个三位的自然数(用valid事件设定),且Text2中的数大于Text1中的数据(用valid事件设定),当单击“计算”按钮时,计算在这两个自然数之间满足数字本身三个数字之和为10这样条件的数之和,并将计算结果显示在文本框Text3中;2. 在表单中增加一个“重置”按钮,其字体字号同其他命令按钮,单击该命令按钮时,三个文本框的内容均清空。3. 单击“关闭”按钮结束表单的运行。界面设计如下图所示。按功能完成如下操作:(三) 请将“计算”命令按钮单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。(四) 按要求完成“重置”按钮和“关闭”按钮的程序代码,

6、完成text1和text2事件代码的设定。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.TEXT1.VALUE=""THISFORM.TEXT2.VALUE=""THISFORM.TEXT3.VALUE=""在关闭按钮的click事件代码窗口中输入:THISFORM.RELEASE修改计算按钮的click事件代码如下:A=VAL(THISFORM.TEXT1.VALUE)B=VAL(THISFORM.TEXT2.VALUE)P=AS=0DO WHILE P <= BC=I

7、NT(P/100)D=INT(p/10)-INT(P/100)*10E=P-INT(P/10)*10if C+D+E=10S=S+PENDIFP=P+1ENDDOTHISFORM.TEXT3.VALUE=STR(S)TEXT1的valid事件代码如下:return val(thisform.text1.value)>=100 and val(thisform.text1.value)<=999 AND VAL(THISFORM.TEXT1.VALUE) =INT(VAL(THISFORM.TEXT1.VALUE)TEXT2的valid事件代码如下:return val(thisfo

8、rm.text2.value)>=100 and val(thisform.text2.value)<=999 and val(thisform.text2.value)>val(thisform.text1.value) AND VAL(THISFORM.TEXT2.VALUE) =INT(VAL(THISFORM.TEXT2.VALUE)(三) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,其中已经添加两个名称分别为Label1和Label2的标签和一个定时器Timer1,标签Label1的标题为“销售管理信息系统”。要求完成如

9、下功能:(1)将标签Label1的字体设置为“黑体”,字号为20,颜色为RGB(255,0,0),调整其大小,显示所有内容,其他控件的字体为隶书,字号为20。(2)将Timer1控件的事件代码中“?”位置改成正确的代码,并在属性窗口设置Timer1的相应属性,保证每隔20毫秒,标签Label1能够不停的自右向左移动(移动值设置为-2),标签右边沿移至表单左边沿后,则标签再次从表单右边沿开始向左移动,循环往复。(3)添加名为Timer2的定时器控件,并编写相应的代码,保证每隔1秒在标签Label2中显示当前系统时间。(4)添加一个“退出”按钮,单击此按钮,则退出表单的运行。界面设计如下图所示:需

10、要完成的操作如下:3. 请将timer1控件的事件代码中的?去掉,改成正确的代码,不能增加行或删除行。4. 按要求完成 “退出”按钮的事件代码,添加timer2控件并完成相应的代码设置。5. 完成相关属性的设置。注意:完成表单设计后要运行表单的所有功能。(在关闭按钮的click事件代码窗口中输入:THISFORM.RELEASETIMER1控件的事件代码如下:IF THISFORM.LABEL1.LEFT>-THISFORM.LABEL1.WIDTHTHISFORM.LABEL1.LEFT=THISFORM.LABEL1.LEFT-2ELSETHISFORM.LABEL1.LEFT=TH

11、ISFORM.WIDTHENDIF TIMER2控件的事件代码如下:THISFORM.LABEL2.CAPTION=TIME()(四) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单中有两个命令按钮“输出”和“退出”(名称分别为Command1和Command2);二个文本框(名称分别为Text1、Text2),五个标签(名称分别为Label1、Label2、Label3、Label4、Label5)。要求完成以下功能:1. 在文本框Text1中输入姓名(不能为空,用事件代码限定),在Text2中修改学生成绩,初始成绩为100,用属性窗口设置,当

12、单击“输出”按钮时,在标签Label5中显示等级,格式为“姓名”+“的等级为”+ 等级,其中等级的划分为:不及格(大于等于0且小于60)、合格(大于等于60且小于90)、优秀(大于等于90且小于等于100),2. Text2中修改的成绩只能在0-100之间,否则在判断等级时显示“数据错误”(不用在单独事件中设定,在给定的事件中已设定),如果其中的值不为100,则光标进不去(用事件设定),添加一个“重置”按钮,字体字号同其他命令按钮,单击重置按钮,则text1为空,text2为100。3. 单击“退出”按钮时结束表单的运行。表单运行示例如下:需要完成的操作如下:6. 请将“输出”命令按钮单击事件

13、代码中的?去掉,改成正确的代码,不能增加行或删除行。7. 按要求完成“退出”按钮和两个文本框的事件代码。8. 添加“重置”按钮,完成事件代码设定。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.TEXT1.VALUE=""THISFORM.TEXT2.VALUE=100在退出按钮的click事件代码窗口中输入:THISFORM.RELEASE修改输出按钮的click事件代码如下:cj=thisform.text2.valuedo casecase cj>=0 AND CJ<60thisform.label5

14、.caption= THISFORM.TEXT1.VALUE+"的等级为不及格"case cj>=60 and cj<90thisform.label5.caption=THISFORM.TEXT1.VALUE+"的等级为合格"case cj>=90 and cj<=100thisform.label5.caption=THISFORM.TEXT1.VALUE+"的等级为优秀"otherwisethisform.label5.caption="数据错误"endcaseTEXT1的valid事

15、件代码如下:return LEN(ALLTRIM(thisform.TEXT1.VALUE)<>0TEXT2的when事件代码如下:return thisform.TEXT2.VALUE=100(五) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单中有两个命令按钮(名称分别为Command1和Command2),其标题文本分别为“输出”和“退出”。五个文本框(名称分别为Text1、Text2、Text3、Text4、Text5),两个标签(名称分别为Label1、Label2)。1. 要求在五个文本框中分别输入数据长度不超过4位的五个

16、数(用事件代码加以限定),当单击“输出”按钮时,在标签Label2中显示由大到小排序的结果,其字体显示为红色(RGB(255,0,0)。2. 单击“退出”按钮时结束表单的运行。表单运行效果示例如下:(需要完成的操作如下:9. 请将“输出”命令按钮单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。10. 按要求完成 “退出”按钮的事件代码,五个文本框的事件代码。注意:完成表单设计后要运行表单的所有功能。(在退出按钮的click事件代码窗口中输入:THISFORM.RELEASE修改输出按钮的click事件代码如下:dimension x(5)THISFORM.LABEL2.CAPTIO

17、N=""for i=1 to 5p="thisform.text"+STR(I,1) +".value"x(i)=val(&p)endforfor i=1 to 4for j=i+1 to 5if x(i)<x(j)t=x(i)X(I)=X(J)X(J)=TendifendforENDFORfor i= 1 to 5thisform.label2.caption= THISFORM.LABEL2.CAPTION+str(x(i),7,2)endforTEXT1的valid事件代码如下:RETURN LEN(ALLTRIM

18、(thisform.TEXT1.VALUE)<=4TEXT2的valid事件代码如下:RETURN LEN(ALLTRIM(thisform.TEXT2.VALUE)<=4TEXT3的valid事件代码如下:RETURN LEN(ALLTRIM(thisform.TEXT3.VALUE)<=4TEXT4的valid事件代码如下:RETURN LEN(ALLTRIM(thisform.TEXT4.VALUE)<=4TEXT5的valid事件代码如下:RETURN LEN(ALLTRIM(thisform.TEXT5.VALUE)<=4(六) 简单应用(15分)在指定

19、的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单上有两个标签(名称为Label1、Label2),三个文本框(名称为Text1、Text2、Text3),其中文本框Text3的字体为楷体,20号字,颜色为RGB(0,255,0),两个命令按钮(名称为Command1、Command2),其标题文字分别为“计算”和“退出”。要求完成以下功能:1. 在Text1和Text2中分别输入一个自然数时,(Text2中输入的数要大于Text1中的数,且为自然数,即大于等于0的整数,要求用valid事件代码限定),当单击“计算”按钮时,计算出这两个自然数之间所有素数的和,并将结果显示在

20、Text3中。2. 添加一个“重置”按钮,字体字号同“计算”按钮,单击“重置”按钮,则三个文本框均置空。3. 当单击“退出”按钮时,则结束表单的运行。表单运行示例如下:需要完成的操作如下:11. 请将“计算”命令按钮单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。12. 按要求完成 “退出”按钮的事件代码,两个文本框的事件代码。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.TEXT1.VALUE=""THISFORM.TEXT2.VALUE=""THISFORM.TEXT3.VALUE

21、=""在退出按钮的click事件代码窗口中输入:THISFORM.RELEASE修改计算按钮的click事件代码如下:a=val(thisform.text1.value)b=val(thisform.text2.value)s=0for i=a to bfor j= 2 to i-1if int(i/j)=i/jexitendifendforif i=js=s+iendifendforthisform.text3.value=int(s)TEXT1的valid事件代码如下:RETURN VAL(THISFORM.TEXT1.VALUE)>0 AND VAL(THIS

22、FORM.TEXT1.VALUE)=INT(VAL(THISFORM.TEXT1.VALUE)TEXT2的valid事件代码如下:RETURN VAL(THISFORM.TEXT2.VALUE)>0 AND VAL(THISFORM.TEXT2.VALUE)=INT(VAL(THISFORM.TEXT2.VALUE) AND VAL(THISFORM.TEXT2.VALUE)>VAL(THISFORM.TEXT1.VALUE)(七) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,在表单中有四个标签(名称为Label1、Label2、Lab

23、el3、Label4),一个下拉式组合框,三个文本框(名称为Text1、Text2、Text3),TEXT1、TEXT2、TEXT3的字体颜色分别为RGB(255,0,0)、RGB(0,255,0)、RGB(0,0,255)两个命令按钮(名称为Command1、Command2),其标题文字分别为“统计”和“退出”。要求完成以下功能:1. 在文本框combo1中选择一组已有的字符或者输入长度大于6的字符串内容(若长度不大于6,焦点不能离开combo1,用事件代码限定)。当单击“统计”按钮时,分别统计“字符”、“数字”和“其他”的个数,并将结果分别显示在文本框Text2、Text3、Text4中

24、。2. 添加一个“重置”按钮,其字体字形同“统计”按钮,单击“重置”按钮,则将组合框,三个文本框中的内容清空。3. 单击“退出”按钮则退出运行状态。表单运行示例图如下:需要完成的操作如下:13. 请将“统计”命令按钮单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。14. 按要求添加“重置”按钮及它的属性设置和它的事件代码的设置15. 按要求编写“退出”按钮的事件代码,组合框的事件代码。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.COMBO1.VALUE=""THISFORM.TEXT1.VALUE=&q

25、uot;"THISFORM.TEXT2.VALUE=""THISFORM.TEXT3.VALUE=""在退出按钮的click事件代码窗口中输入:THISFORM.RELEASE修改统计按钮的click事件代码如下:C=0D=0E=0a=ALLTRIM(bo1.DISPLAYvalue)b=LEN(A)for i=1 to bch=SUBSTR(A,I,1)DO CASECASE ch>="a" and ch<="z" OR ch>="A" and ch<=&qu

26、ot;Z"C=C+1CASE ch>="0" and ch<="9" D=D+1otherwisee=e+1ENDCASEENDFORthisform.text1.value=str(C,3)thisform.text2.value=str(D,3)thisform.text3.value=str(E,3) combo1的valid事件代码如下:RETURN LEN(ALLTRIM(THISFORM.COMBO1.DISPLAYVALUE)>6(八) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myf

27、orm002,表单中有三个标签(Label1、Label2、Label3),一个文本框(Text1),一个选项按钮组(Optiongroup1),一个列表框(List1),两个命令按钮(Command1、Command2),其标题文字分别为“重置”和“退出”。要求完成以下功能:1. 在文本框Text1输入行数(行数不能超过6行,必须为一个自然数,且如果不输入也不允许退出Text1焦点)后,在Optiongroup1中,单击相应按钮,则在列表框中显示对应的图形。2. 单击“重置”按钮,则文本框和列表框内容清空,选项按钮组全部未选中,TEXT1获得焦点。3. 单击“退出”按钮则结束表单运行。表单运

28、行示例图如下:需要完成的操作如下:16. 请将选项按钮组、第一个按钮、第二个按钮、第三个按钮的单击事件代码中的?去掉,改成正确的代码,不能增加行或删除行。17. 按要求完成“重置”按钮和“退出”按钮的事件代码,文本框的事件代码。注意:完成表单设计后要运行表单的所有功能。(在重置按钮的click事件代码窗口中输入:THISFORM.TEXT1.VALUE=""THISFORM.OPTIONGROUP1.VALUE=0thisform.LIST1.ROWSOURCE=""THISFORM.TEXT1.SETFOCUS()在退出按钮的click事件代码窗口中输

29、入:THISFORM.RELEASE选项按钮组的click事件代码如下:public p,xp=val(thisform.text1.value)dimension x(p)for i=1 to px(I)=""endforfor i=P to 1 step -1x(P-I+1)=space(6-P)for j=1 to Ix(P-I+1)=x(P-I+1)+"*"endforendforthisform.list1.rowsourcetype=5thisform.list1.rowsource="X"thisform.refresh

30、选项按钮组的第一个选项按钮的click事件代码如下:public p,xp=val(thisform.text1.value)dimension x(p)for i=1 to px(I)=""endforfor i=1 to P step 1x(I)=space(6-I)for j=1 to 2*I-1x(I)=x(I)+"*"endforendforthisform.list1.rowsourcetype=5thisform.list1.rowsource="X"thisform.refresh选项按钮组的第二个选项按钮的click

31、事件代码如下:public p,xp=val(thisform.text1.value)dimension x(p)for i=1 to px(I)=""endforfor i=1 to P step 1x(I)=space(6-I)for j=1 to Ix(I)=x(I)+"*"endforendforthisform.list1.rowsourcetype=5thisform.list1.rowsource="X"thisform.refresh选项按钮组的第三个选项按钮的click事件代码如下:public p,xp=val(

32、thisform.text1.value)dimension x(p)for i=1 to px(I)=""endforfor i=P to 1 step -1x(P-I+1)=space(6-I)for j=1 to 2*I-1x(P-I+1)=x(P-I+1)+"*"endforendforthisform.list1.rowsourcetype=5thisform.list1.rowsource="X"thisform.refreshTEXT1的valid事件代码如下:RETURN VAL(THISFORM.TEXT1.VALU

33、E)>0 AND VAL(THISFORM.TEXT1.VALUE)=int(VAL(THISFORM.TEXT1.VALUE) and val(THISFORM.TEXT1.VALUE)<=6(九) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单中已有七个标签(名称为Label1label7),一个命令按钮组,一个命令按钮,四个文本框(名称分别为Text1text4),两个选项按钮组,一个复选按钮,一个编辑框,要求完成以下功能:1. 显示或编辑RSDA.DBF数据表中的各个记录的相关字段值,当为首记录时,“首记录”,“上一条”按钮不

34、可用,当为末记录时,“下一条”和“末记录”按钮不可用,单击“添加记录时,“下一条”和“末记录”按钮不可用,可以在数据表最后增加记录,单击“删除记录”,“首记录”和“上一条”不可用,可以删除一条记录。2. 记录号即TEXT1中的值,通过程序代码显示。3. 单击“退出”按钮时结束表单的运行。表单运行事例如下图所示。需要完成的操作如下:1. 请将命令按钮组中各个命令按钮的单击事件代码和表单INIT事件代码中的?去掉,改成正确的代码,不能增加行或删除行。(十) 按要求完成 “退出”按钮的事件代码。注意:完成表单设计后要运行表单的所有功能。(表单的INIT代码为:THISFORM.TEXT1.VALUE

35、=RECNO()THISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.F.命令按钮组中的首记录的click事件代码:GO TOPTHISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND4.ENABLED=.T.THISFOR

36、M.TEXT1.VALUE=RECNO()THISFORM.REFRESH命令按钮组中的上一条的click事件代码:SKIP -1IF RECNO()=1THISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.F.ENDIFTHISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND4.ENABLED=.T.THISFORM.TEXT1.VALUE=RECNO()THISFORM.REFRESH命令

37、按钮组中的下一条的click事件代码:A=RECNO()GO BOTTOMB=RECNO()GO ASKIPIF RECNO()=BTHISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND4.ENABLED=.F.ENDIFTHISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.T.THISFORM.TEXT1.VALUE=RECNO()THISFORM.REFRESH命令按钮组中的末记录的cl

38、ick事件代码:GO BOTTOMTHISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND4.ENABLED=.F.THISFORM.TEXT1.VALUE=RECNO()THISFORM.REFRESH命令按钮组中的添加记录的click事件代码:SELECT RSDAGO BOTTOMTHISFORM.REFRESHTHISFORM.

39、TEXT2.READONLY=.F.THISFORM.TEXT3.READONLY=.F.THISFORM.TEXT4.READONLY=.F.THISFORM.EDIT1.READONLY=.F.APPEND BLANKTHISFORM.TEXT1.VALUE=RECNO()THISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND4.

40、ENABLED=.F.THISFORM.REFRESHTHISFORM.TEXT1.SETFOCUS()命令按钮组中的删除记录的click事件代码:DELETEPACKTHISFORM.REFRESHTHISFORM.COMMANDGROUP1.COMMAND1.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND2.ENABLED=.F.THISFORM.COMMANDGROUP1.COMMAND3.ENABLED=.T.THISFORM.COMMANDGROUP1.COMMAND4.ENABLED=.T.THISFORM.TEXT1.VALUE=RECNO()

41、THISFORM.REFRESH在关闭按钮的click事件代码窗口中输入:THISFORM.RELEASE(十) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单上有一个标签(Label1),一个图像控件(Image1),一个计时器控件(Timer1),一个命令按钮(Command1),其标题为“退出”。要求完成以下功能:1. 要求使用属性窗口为图像控件Image1添加要显示的图片内容(所需图片在对应的考生文件夹中),采用等比填充,然后图片每隔20毫秒在表单的水平方向上移动,到达表单的左或右边框时向相反方向移动。2. 当单击“退出”按钮时,结束表单

42、的运行。表单设计完成后如下图所示:需要完成的操作如下:1. 修改程序,将计时器的timer事件代码中的“?”改成正确的内容,不能添加或删除代码行;2. 编写“退出”按钮的程序代码;3. 在表单的Init事件中设置ff为公共变量,初始值为.T.。通过属性将图片添加上去,采用等比填充。注意:完成表单设计后要运行表单的所有功能。(表单的init事件代码如下:public ffff=.T.在退出按钮的click事件代码窗口中输入:THISFORM.RELEASE修改计时器的timer事件代码如下:if ffthisform.image1.left= thisform.image1.left+2else

43、thisform.image1.left=thisform.image1.left-2endifif thisform.image1.left<0 or thisform.image1.left>thisform.width -thisform.image1.widthff=not ffendif(十一) 简单应用(15分)在指定的考生文件夹下,完成下列简单应用操作。打开表单myform002,表单中已有四个个标签(名称为Label1label4),二个命令按钮“登录”和“退出”(名称分别为Command1和Command2),两个个文本框(名称分别为Text1、Text2),一个组合框控件要求完成以下功能:1. 设置表单的背景图片,背景图片在给定文件夹下。2. 在“操作员姓名”下拉列表中选择姓名,如果未选择则提示“尚未选择操作员姓名”,在“操作员工号”后面的文本框中输入工号,在“操作员密码”后面的文本框中输入密码,密码显示为*号,如果均正确,则给出“登录成功,欢迎您进入系统”,结束表单运行;如果不正确,且未达到三次,则给出“输入错误,请重新输入”,如果三次输入错误,则给出“登录失败,您无权使用系统”,结束表单运行。3. 单击“退出”按钮时结束表单的运行。(工

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论