VF 表单题

1.设计一个名为Form1的表单，表单上有两个命令按钮（Command1、Command2）：“计算” 和“退出”，两个文本框（Text1、Text2），三个标签（Label1、Label2、Label3），标签显示内容分别为：“数学”、“物理”和“总分=”，运行表单，单击“计算”按钮，求出数学和物理的和，并在标签三中输出计算结果；单击“退出”按钮，关闭表单。

Command1 click事件代码：

a=val(thisform.text1.value)

b=val(thisform.text2.value)

S=a+b

bel3.caption=str(s,4,1)

Command2 click事件代码：

thisform.release

2.设计一个名为Form1的表单，表单上有两个命令按钮（Command1、Command2）分别为: “显示”和“关闭”；三个文本框（Text1、Text2、Text3）；四个标签（Label1、LABEL2、LABEL3、LABEL4）分别为:“显示日期为：”、“年”、“月”、“日”，运行表单，单击“显示”按钮，三个文本框中分别输出系统当前的“年、月、日”；单击“关闭”按钮，关闭表单。Command1 click事件代码：

Thisform.text1.value=year(date())

Thisform.text2.value=month(date())

Thisform.text3.value=day(date())

Command2 click事件代码：

thisform.release

3.设计一个名为FORM1的表单，表单上有两个命令按钮（COMMAND1、COMMAND2）、两个文本框（TEXT1、TEXT2）和两个标签（LABEL1、LABEL2），按钮标题分别为“计算”和“关闭”、两个标签分别显示“请输入N的值”，“N！=”字样，两个文本框分别用来接收输入的N值和输出N！。运行表单，在第一个文本框中输入N的值，单击“计算”按钮计算N！，并在第二个文框中输出计算结果；单击“关闭”按钮，关闭表单。

Command1 click事件代码：

n=val(thisform.text1.value)

p=1

For i=1 to n

p=p*i

Endfor

Thisform.text2.value=str(p)

Command2 click事件代码：

thisform.release

4.设计一个名为FORM1的表单，表单上有三个标签（LABEL1、LABEL2、LABEL3），标题分别为“选课系统”、“图书管理系统”、“成绩查询系统”，当用鼠标单击任何一个标签时，其他两个标签的标题文本互换。

LABEL1的CLICK事件代码：

T=BEL2.CAPTION

BEL2.CAPTION=BEL3.CAPTION

BEL3.CAPTION=T

LABEL2的CLICK事件代码：

T=BEL1.CAPTION

BEL1.CAPTION=BEL3.CAPTION

BEL3.CAPTION=T

LABEL3的CLICK事件代码：

T=BEL2.CAPTION

BEL2.CAPTION=BEL1.CAPTION

BEL1.CAPTION=T

5.设计一个名为FORM1的表单，该表单的功能是：若在TEXT1中输入一个除数（整数），然后点击＇开始＇按钮（COMMAND1），就能求出1至200之间能被此除数整除的数之和，并将结果在TEXT2中输出。单击＇清除＇按钮（COMMAND2），则清除TEXT1和TEXT2中的内容；单击＇退出＇按钮（COMMAND3）退出程序。

COMMAND1 CLICK事件代码：

N=V AL(THISFORM.TEXT1.V ALUE)

S=0

FOR I=1 TO 200

IF I%N=0

S=S+I

ENDIF

ENDFOR

THISFORM.TEXT2.V ALUE=STR(S)

COMMAND2 CLICK事件代码：

THISFORM.TEXT1.V ALUE=" "

THISFORM.TEXT2.V ALUE=" "

COMMAND3 CLICK事件代码：

THISFORM.RELEASE

6.设计一个名为FORM1的表单，该表单的功能是：有两个标签（LABEL1、LABEL2），分别是“小写”和“大写”。在TEXT1中输入一个小写字母，然后点击“转换”按钮（COMMAND1），就能在TEXT2中输出其大写字母。单击“清除”按钮（COMMAND2），则清除TEXT1和TEXT2中的内容；单击“退出”按钮（COMMAND3）退出程序。

COMMAND1 CLICK事件代码：

THISFORM.TEXT2.V ALUE=UPPER(THISFORM.TEXT1.V ALUE)

COMMAND2 CLICK事件代码：

RELEASE THISFORM

7.设计一个名为FORM1的表单，其中3个控件分别是：标签LABEL1、命令按钮（关闭）COMMAND1、复选框（合格）CHECK1。为COMMAND1编写CLICK事件，当单击该命令按钮时释放该表单；为CHECK1编写INTERACTIVECHANGE事件，当选中该复选框时在LABEL1上显示“继续努力！”字样，否则在LABEL1上不显示任何信息。

COMMAND1 CLICK事件代码：

RELEASE THISFORM

CHECK1编写INTERACTIVECHANGE事件代码：

IF THIS.VALUE=1