根据本讲学习内容，综合运用LinearLayout、TextView进行界面布局，以及掌握按钮的点击事件监听。 （1）参照本讲的课程内容创建一个计算器，界面如附件所示，完成基本的加、减、乘、除四则运算。 （2）提交的作业包中包含应用程序的运行效果截图和源代码。

当Applet程序中的init方法为下列代码时，运行后用户界面会出现的情况，以下描述正确的是（　　）。

public void init

{

setlLayout(new BorderLayout)；

add(”North”，new TextField(10))：

add(”Center”，new Button(”help”))：

}

A.文本框将会出现在Applet的顶上，且有l0个字符的宽度

B.按钮将会出现在Applet的正中间，且尺寸为正好能够包容help的大小

C.文本框将会出现在Applet的顶上，从最左边一直延伸到最右边；按钮将会出现在Applet的正中间，覆盖除文本框外的所有空间 

D.按钮与文本框的布局依赖于Applet的尺寸

C【解析】该题考查对容器布局策略的理解。边界布局管理器BorderLayout将容器按上北下南左西右东划分为东、南、西、北、中5部分，分别用英文单词East，South， North，West，Center来表示。其中，东、西、南、北4个方向的组件宽度为恰好能够包容组件的内容，而长度为延伸到该容器边界的长度；而对于中间的组件，它会扩充到除四边以外的整个容器区域。本题的具体情况是：文本框将会出现在applet的顶上，长度为整个applet的宽度；按钮将会出现在applet的正中央，覆盖除文本框外的所有空间。

A.Text

B.Title

C.Display

D.Caption

A.文本框将会出现在Applet的顶上，且有l0个字符的宽度

B.按钮将会出现在Applet的正中间，且尺寸为正好能够包容help的大小

C.文本框将会出现在Applet的顶上，从最左边一直延伸到最右边；按钮将会出现在Applet的正中间，覆盖除文本框外的所有空间

D.按钮与文本框的布局依赖于Applet的尺寸

命令按钮对文本选中内容的复制、字体设置，效果见图2.2。 创建项目，以“昵称-2-2”为项目名保存。 项目完成后，将整个项目文件夹压缩成：昵称-2-2.rar，以附件形式提交。 具体要求如下： 界面有两个文本框，三个命令按钮 ①Button1：Text属性为“隶书 25磅”，Button1_Click事件过程代码为： TextBox1.Font = New Font("隶书", 25) ②Button2：Text属性为“幼圆 15磅”，代码类似。 ③Button3：Text属性为“复制 =>”，要求复制在TextBox1选中的内容以及其字体格式。选中的内容通过TextBox1的.SelectedText属性；字体通过Font直接赋值。图2.2 运行界面

A.Text

B.Title

C.Display

D.Caption

A.选择任意按钮都需要支付游戏币

B.选择任意按钮都不需要支付游戏币

C.选择第二个按钮后可以得到额外游戏奖励

D.选择第三个按钮后游戏能继续进行下去

（1）在名称为Form1的窗体上创建两个名称分别为Option1和Option2，标签分别为“教授”和“研究员”的单选按钮，再建立一个名称为Label1的标签，实现如下功能：当选中“教授”时，标签上显示“博士学位以上”，如果选中“研究员”，则标签上显示“硕士学位以上”，结果如图67-1所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sj1．vbp，窗体文件名为sj1．frm。

（2）在名称为Form1的窗体上画两个名称分别为Text1和Text2、内容都为空的文本框，再画一个命令按钮，其名称为Command1、标题为“判断”。编写适当的事件过程，要求程序运行后，如果在Text1中输入一个数，单击命令按钮Command1，判断输入的是否为偶数，如图67-2所示。要求：不得使用任何变量。

注意：存盘时必须存放在考生文件夹下，工程文件名为sj2．vbp，窗体文件名为sj2．frm。

则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2和Text3三个文

本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中：单击退出按钮则退出。

请将下列程序填空补充完整。

Private Sub Command1_Click()

Me!Text1=""

Me!Text2=""

Me!Text3=""

Me!Text4=""

End Sub

Pdvate Sub Command2_Click()

If Me!Text1="" Or Me!Text2="" Or Me!Text3=""then

MsgBox"成绩输入不全"

Else

Me!Text4=(【 】+Val(Me!Text2)+Val(Me!Text3))/3

【 】

End Sub

Private Sub Command3_Click()

Docmd. 【 】

End Sub

请将程序中有“?”的地方替换为相应的代码，使得在运行时，单击“输入”按钮，弹出“输入”对话框，单击“计算显示”按钮，则找出大于输入参数的最小素数，并显示在Text1中；单击“保存”按钮，则把Text1中的计算结果存入考生文件夹下的out5．txt文件中。

注意：去掉程序中的注释符“‘”，把程序中的“?”改为正确的内容，使其实现下述功能，但不能修改程序中的其他部分，也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。考生不得修改isPrimeNum函数过程和控件的属性，必须把计算结果通过“保存”按钮存入out5．txt文件中，否则无成绩。