●试题八阅读以下说明及Visual Basic部分程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【说明】本程序是一个可进行数制转换的应用程序，图1所示是其运行界面。txtDec为TextBox控件名，Lblkes为转换结果labe1控件名。【程序代码】Option ExplicitPrivate Function convert(pintDec As Intege，pintS As Integer)As StringDim intCt As Integer，intR As IntegerDim s

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。

【说明】

以下程序为求行列式X(5,5)的值S。

【Visual Basic代码】

Private Function col ( byval x ( 5,5 ) as integer ) as long

dim fesult as long

dim temp as long

dim I as integer

dim j as integer

dim k as imeger

result = 0

for I = to 5

(1)

for j = 1 to 5

if I+j＞6 then

k= ( 1+j ) mod 5

else

k=1

endif

temp=temp*x ( k,j )

(2)

result=(3)

(4)

(5)

End function

阅读以下说明和流程图，将应填入(n)处的字句写在对应栏内。

[说明]

设学生某次考试的成绩按学号顺序逐行存放于某文件中，文件以单行句点“.”为结束符。下面的流程图读取该文件，统计出全部成绩中的最高分max和最低分min。

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。

【说明】

在窗体上设计两个文本框和两个标签，标签上显示：“摄氏温度：”和“华氏温度：”，文本框一个用于输入摄氏温度数，一个用于输出对应的华氏温度。摄氏温度与华氏温度的转换公式为：c=(5/9)×(f-32)

要求：对输入的摄氏温度数有检查功能，以拒绝接收非数字字符。运行界面如图所示。

【Visual Basic代码】

Private Sub Commandl_Click ()

Text1 = ""

Text2 = ""

Text1.Enabled = True

Text2.Enabled = True

Text1.SetFocus

End Sub

Private Sub Command2 Click ()

End

End Sub

Private Sub Form. Load ()

Text1 = ""

Text2 = ""

Text1.Enabled = False

Text2.Enabled = False

End Sub

Private Sub Textl_Change ()

Text2.Text = (1)

End Sub

Private Sub Textl_KeyPress (KeyAscii As (2) )

If (3) Then

If Chr ( KeyAscii ) ＜ "0" Or (4) Then

(5)

End If

End If

End Sub

阅读以下应用说明、属性设置及Visual Basic程序代码，将应填入______处的语句写在答题纸的对应栏内。

[应用说明7]

本应用程序的运行窗口如图2-5所示。

只要用户单击“闪烁”按钮，文字“欢迎光临”就会以0.3s消失、0.3s显示反复进行闪烁；单击“停止”按钮，闪烁停止，恢复图示的初态。

[属性设置7]

[程序代码7]

Private Sub CmdF C1ick()

Timerl. (3)=True

Label.Visible=False

End Sub

Private Sub Timerl_Timer()

(4)=not Label.Visible

End Sub

Private Sub CmdT_Click()

Timerl.Enabled=(5)

Label.Vlsible=true

End Sub

阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。

【应用说明5.1】

本应用程序的窗体中有一个下拉式列表框(名称为Combo1)和两个文本框(名称分别为 Txt1和Txt2)。运行时，用户从Combo1的列表中进行选择，程序就会将选中条目的内容以及编号(从0开始)分别在文本框Txt1和Txt2中显示出来。

【程序代码5.1】

Private Sub Combo1_Click()

Txt1.Text = Combo1. (1)

Txt2.Text = Combo1. (2)

End Sub

(注：可供(2)处选择的选项：List, Index, Listlndex, ListCount, Number)

【应用说明5.2】

本应用程序的运行窗口如图2所示。

开发该应用的部分程序代码如下：

【程序代码5.2】

Private Sub CmbOp_Click()

Dim Dataln As Double,DataOut as Double

Dataln=(3)

Select Case (4)

Case "取整数部分"

DataOut =Int(Dataln)

Case "求平方根"

If Dataln＜0 Then

MagBox "负数不能开平方!"

Else

DataOut = Sqr(Dataln)

End If

Case "取绝对值"

DataOut = Abs(Dataln)

(5)

TxtOut. Text = str $ (DataOut)

End Sub

●试题二

阅读下列函数说明和C代码，将应填入(n)处的字句写在答题纸的对应栏内。

【说明】

该程序运行后，输出下面的数字金字塔

【程序】

include<stdio．h>

main ()

{char max，next；

int i；

for(max=′1′；max<=′9′；max＋＋)

{for(i=1；i<=20- (1) ；＋＋i)

printf(" ")；

for(next= (2) ；next<= (3) ；next＋＋)

printf("％c"，next)；

for(next= (4) ；next>= (5) ；next--)

printf("％c"，next)；

printf("＼n")；

}

}

●试题五

阅读以下应用说明、属性设置及Visual Basic程序代码，将应填入(n)处在字句写在答题纸的对应栏内。

【说明】

本应用程序的运行窗口如图2所示。

只要用户单击"闪烁"按钮，文字"欢迎光临"就会以0．3秒消失、0．3秒显示反复进行闪烁；单击"停止"按钮时，闪烁停止，恢复图示的初态。

在开发过程中，需要设置的属性如表1所示。

在开发过程中，需要编写的程序代码如下：

【程序】

Private Sub CmdF_Click()

Timer1． (3) =True

Labe1．Visible=False

End Sub

Private Sub Timer1_Timer()

(4) =not Label.Visible

End Sub

Private Sub CmdT_Click()

Timer1．Enabled= (5)

Labe1．Visible=true

End Sub

图2-1是基于软交换的网络分层模型。请将选项应填入（n）处的字句写在答题纸对应的解答栏内。

（）阅读下列说明和C语言程序，将应填入 （n）处的语句写在答题纸的对应栏内。[说明]下面程序是一个带参数的主函数，其功能是显示在命令行中输入的文本文件内容。[C语言函数]#include"stdio．h"main(argc,argv) int argc； char *argv[]； ｛ （1） ； if((fp=fopen(argv[1]，”r’’))== （2） ) ｛ printf(”file not open！＼n”)；exit(0)；｝ while( （3） ) putchar( （4） )； （5）； ｝

阅读以下说明及Visual Basic 程序代码，将应填入(n)处的字句写在对应栏内。

[程序5.1说明]

下列程序运行时，当单击窗体后，从键盘输入一个字符，判断该字符是字母字符、数字字符还是其他字符，并做相应的显示。窗体上无任何控件，并禁用Ase和Chr函数，Select Case语句中禁用枚举值。

[Visual Basic代码]

Private Sub Form. Load ()

Dim x As String*1

X=(1) (“请输入单个字符”，“字符”)

Select Case UCase ( (2) )

Case (3)。

Print X+“是字母字符”

Case (4)

Print X+ “是数字字符”

Case Else

Print X+“是其他字符”

End Select

[程序5.2说明]

在窗体上画一个名称为Timer1的计时器和一个名称为Labe11的标签。当运行程序后，将在标签中显示当前时间的数字时钟(包括时：分：秒)。

[Visual Basic代码]

Private Sub Fom_Load ()

Timer1.Interval=1000

EndSub

Private Sub Timer1_ timer() (5)

EndSub

阅读下列说明和流程图，将应填入(n)的字句写在对应栏内。

【说明】

下列流程图(如图4所示)用泰勒(Taylor)展开式

sinx=x-x3/3!+x5/5!-x7/7!+…+(-1)n×x2n+1/(2n+1)!+…

【流程图】

计算并打印sinx的近似值。其中用ε(＞0)表示误差要求。

阅读下面的说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。

[说明]

阅读以下说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。

windows Server 2003是一个多任务多用户的操作系统，能够以集中或分布的方式实现各种应用服务器角色，是目前应用比较广的操作系统之一。

Windows内置许多应用服务功能，将下表中(1)～(5)处空缺的服务器名称填写在答题纸对应的解答栏内。

(1)

阅读以下说明和流程图，将应填入(n)处的字句写在对应栏内。

[说明]

下面的流程图用于计算一个英文句子中最长单词的长度(即单词中字母个数)MAX。假设该英文句子中只含字母、空格和句点“.”，其中句点表示结尾，空格之间连续的字母串称为单词。

[流程图]

●试题八

阅读以下应用说明及Visual Basic部分程序代码，将应填入(n)处的字句写在答题纸的对应栏内。

【说明】

该应用程序是用来修改文本框中的字体属性，其运行窗口如图4所示。

窗口由1个标签(Labell)、1个文本框(txtPassage)和4个选择框(chkFont，chkltalic，chkSize，chkColor)组成。程序运行后，用户在文本框内输入一段文字，然后按需要单击各选择框，用以改变文本的字体、字型、颜色及大小。

文本框的Mulitine属性已经设为True。当不选择"黑体"时，文字应是"宋体"。当不选择"大小16"时，字号为9。当不选择"紫色"时，字色为黑色。当不选择"斜体"时，文字采用正常字型。

【程序代码】

Private Sub chkFont Click()

If (1) Then

txtPassage．FontName="黑体"

Else

txtPassage．FontName="宋体"

End If

End Sub

Private Sub (2) ()

If chkColor．Value=1 Then

txtPassage．ForeColor=QBColor (13)

Else

txtPassage．ForeColor=QBColor(0)

End If

End Sub

Private Sub chkltalic_Click()

If chkltalic.

Value=1 Then

txtPassage．FontI talic= (3)

Else

txtPassage．FontItalic= (4)

End If

End Sub

Private Sub chkSize_Click()

If (5) Then

txtPassage．Font．Size=16

Else

txtPassage．Font．Size=9

End If

End Sub

●试题一

阅读下列说明和流程图，将应填入(n)的字句写在答题纸的对应栏内。

【说明】

下列流程图(如图4所示)用泰勒(Taylor)展开式

sinx=x-x3／3!+x5／5!-x7／7!+…+(-1)n×x 2n+1／(2n+1)!+…

【流程图】

图4

计算并打印sinx的近似值。其中用ε(>0)表示误差要求。

试题三（共 15 分）

阅读以下说明和 C 程序，将应填入 （n） 处的字句写在答题纸的对应栏内。

（a）智能网概念模型中分布功能平面模型如下图所示，请根据此图将应填入（n）处的 字句写在答题纸的对应栏内。

图6-1是下一代网络的体系结构简图，请根据此简图将应填入（n）处的字句写在答题纸的对应栏内。