VF程序设计考试题.docxVIP

Vf程序设计 一个“判定等级”表单如下图所示，包含一个文本框(Textl)、二个标签(Labell, Label2) 和二个命令按钮(Command 1, Command2)0此表单的功能是：在文本框Textl中输入一个 成绩后，当按下“判定等级Command 1 ”按钮后，会根据输入的成绩判定该同学的成绩级別 并在Label2标签处显示；当按下清空Command?n按钮后，会自动清除Textl和Labe 12 屮的内容。请写出这两个命令按钮对应的Click事件代码。(注：成绩在90?100分Z间， 级别为“优秀”;成绩在80?89分之间,级别为“良好”；成绩在70?79分之间,级别为“中 等”；成绩在60?69分之I可，级别为“及格”；成绩在0?59分之间，级别为“不及格”。) Connamdl的单击事件代码 Ma=val(thisform.textl .value) si=”该同学的成绩级别为： do case case Ma=90 s2=”优秀” case Ma=80 s2=”良好“ case Ma=70 s2二”屮等“ case Ma=60 s2=”及格” other s2二”不及格” endcase thisform.label2.caption=s 1 +s2 Command2的单击事件代码 thisform.textl .value二” thisform.textl .setfocus thisfor m」abel2.captio n=” 一个显示“九九乘法表”的表单如下图所示。此表单的功能是：鼠标单击表单时，界面 上会显示出“九九乘法表”。请写出该表单(Fowl)的Click事件代码。 表单的单击事件代码 for i=l to 9 for j=l to 9 if i*j10 then ??str(i,l )+”*”+str(j,l )+n=n+str(i*j,l )+space(2) else ??str(i, 1 )+*+str(j, 1 )+=M+str(i*j,2) +space( 1) endif next j ? next i 一个“标签文本互换”表单如图所示,包含三个标签：Labelk Label2、Label3,它们的 文本是：信息技术，生物工程，自动控制。当用鼠标单击任一标签时，都会使其它两个标签 的标题文本互换。请写出这三个标签的Click事件代码。 Label I的单击事件代码 t=thisform.label2.caption thisform.label2.caption=thisfdrm.l abel3.caption thisfor m.l abel3.caption=t Label2的单击事件代码 t=thisfor m.l abel 1 .caption thisfor m.l abel 1 .caption=thisfor m.l abel3.caption thisform.label3.caption=t Label3的单击事件代码 t=thisform.l abel2.caption thisfor m」abe!2.caption=thisform Jabel 1 .captio n thisfor m」abel 1 .caption=t 设计一个名称为“各种背景色”的表单，在表单屮，有一个命令按钮组，4个命令按钮 的标题依次为“红色、黄色、黑色、白色”，当鼠标单击不同的命令按钮时，表单的背景颜 色也随之变化，写出命令按钮组的单击CLick事件代码。 提示：4种颜色的表示方法： 红色 RGB (255, 0, 0)黄色 RGB (255, 255, 128) 黑色 RGB (0, 0, 0) 白色 RGB (255, 255, 255)。 命令按钮组的事件代码 k=ma ndgioupl .value do case case k=l thisform.label 1 .forecolor=rgb(255,0,0) case k=2 thisform.label 1 .forecolor=rgb(255,255,128) case k=3 thisform.label 1 .forecolor=rgb(0,0,0) case k=4 thisform.label 1 .forecolor=rgb(255,255,255) endcase 下图所示的表单包插2个标签控件、2个文本框控件和1个命令按钮控件，表单的功能是: 当用户输入用户名(8个字符：ABCDEFGH)和口令(6位数字：123456),并单击“确定” 按钮后，检验输入是否正确，如正确，则显示“欢迎使用！ ”字样并关闭表单；若不正确， 则显示“用户名或口令不对，请重新输入！ ”。所有控件属性都已设置好，请编写命令