C语言(3)

为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序： Private Sub Timer1_Timer()

For k＝Line1.X1 To Line2.X1 Step 100

If Shape1.Left＋Shape1.Width

运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是________。

A)把计时器的Interval属性设置为1

B)把For k＝Line1.X1 To Line2.X1 Step 100和Next k两行删除

C)把For k＝Line1.X1 To Line2.X1 Step 100改为For k＝Line2.X1 To Line1.X1 Step 100 D)把If Shape1.Left＋Shape1.Width

【解析】Timer1中用了一个循环，只要圆没有到最右边的直线Line2处，这个圆就会一直向右移动。但因为Timer1中本来已经通过设置Interval属性来控制循环，Timer事件中的循环重复了，所以答案为B)。

34下列有关文件的叙述中，正确的是________。

A)以Output方式打开一个不存在的文件时，系统将显示出错信息

B)以Append方式打开的文件，既可以进行读操作，也可以进行写操作 C)在随机文件中，每个记录的长度是固定的

D)无论是顺序文件还是随机文件，其打开的语句和打开方式都是完全相同的 参考答案：C 【解析】以Output模式打开文件时，如果文件名指定的文件不存在，则会自动建立一个文件，系统不会显示错误信息，所以选项A)是错误的；以Append模式打开文件时，是从文件当前结束开始写入数据，且保留原有数据，但是不能读数据，所以选项B)是错误的；随机文件是以记录为单位，有一组固定长度的记录顺序排列而成，并且给每个记录赋予了记录号以便查找，所以选项C)是正确的；随机文件和顺序文件的打开语句和打开方式是不同的，所以选项D)是错误的。

35窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击\删除\按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：

Private Sub Command1_Click() Dim n%，k% n=Len(Text1.Text)

For k=0 To Listl.ListCount-1

If Left(Listl.List(k)，n)=Textl.Text Then Listl.RemoveItem k End If Next k End Sub

在调试时发现，如输入\陈\，可以正确删除所有姓\陈\的项目，但输入\刘\，则只删除了\刘邦\、\刘备\项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把For k＝0 To List1.ListCount－1改为________。

A)For k＝List1.ListCount－1 To 0 Step－1 B)For k＝0 To List1.ListCount

C)For k＝1 To List1.ListCount－1 D)For k＝1 To List1.ListCount 参考答案：A

【解析】错误原因：每一次删除列表框满足项，列表框的项目数目就会相应地减少，所以就出现了漏删内容，如果把循环变量k改成从List1.ListCout－1到0，从最后一个项目往第一个项目查找，满足条件就删除该项目，从而不会出现遗漏现象，所以正确答案为A)。 1某二叉树有5个度为2的结点以及3个度为1的结点，则该二叉树中共有__【1】__个结点。 参考答案：14

【解析】 在二叉树中，度为0的结点数是度为2的结点数加1，故二叉树中结点数的总和为度为0的结点数、度为1的结点数及度为2的结点数三者相加，得出结果为14个结点。 2程序流程图中的菱形框表示的是__【2】__。 参考答案：逻辑判断

【解析】绘制流程图时事实描述用椭圆形表示、行动方案用矩形表示、问题用菱形表示、箭头代表流动方向。

3 软件开发过程主要分为需求分析、设计、编码与测试四个阶段，其中__【3】__阶段产生\软件需求规格说明书\。 参考答案：需求分析

【解析】需求分析阶段的工作主要包括需求获取、需求分析、编写需求规格说明书和需求评审等4方面，产生的主要文档为软件需求规格说明书，它可以为用户、分析人员和设计人员之间的交流提供方便，直接支持目标软件系统的确认，也可以作为控制软件开发进程的依据。 4 在数据库技术中，实体集之间的联系可以是一对一或一对多或多对多的，那么\学生\和\可选课程\的联系为__【4】__。 参考答案：多对多

【解析】 一名学生可以选择多门课程，一门课程也可以由多名学生选择，因此是多对多的联系。

5人员基本信息一般包括：身份证号，姓名，性别，年龄等。其中可以作为主关键字的是__【5】__。

参考答案：身份证号 【解析】 主关键字是表中区别不同的记录的标识，在该表中只有身份证号能具有这个作用，所以用其作为主关键字。

6工程中有Form1、Form2两个窗体。Form1窗体外观如图1所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮\计算并显示\其名称为Command1)，则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图2所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示\请输入数值数据！\。请填空。

Private Sub Command1_Click() If Text1.Text=\MsgBox\请输入半径！\

ElseIf Not IsNumeric( 【6】 )Then MsgBox\请输入数值数据！\ Else

r=Val( 【7】 ) Form2.Show

【8】 .Print \圆的面积是\ & 3.14\r*r End If End Sub

参考答案：Text1.Text Text1.Text Form2

【解析】 IsNumeric是一个字符串函数，其参数是一个字符串或者数字，返回值是一个布尔值，如果这个参数是纯数字组成，将会返回True，否则将返回False，在这里的作用是为了检验文本框中输入的是否为纯数据即数值数据，所以第6个空应该填Text1.Text；在判断完成以后要将Text1中的文本内容转化为数字，因此第7个空也应填Text1.Text；最后输入的结果要在Form2中显示出来，所以第8个空应该填Form2，表示利用的是Form2的Print方法。

7设有整型变量s，取值范围为0～100，表示学生的成绩。有如下程序段： If s>＝90 Then Level＝\

Else If s>＝75 Then Leve1＝\

ElseIf s>＝60 Then Level＝\Else

Level＝\End If

下面用Select Case结构改写上述程序，使两段程序所实现的功能完全相同。请填空。 Select Case s

Case__【9】__>＝90 Level＝\Case 75 To 89 Level＝\Case 60 To 74 Level＝\

Case__【10】__ Level＝\__【11】__

参考答案：Is Else End Select

【解析】在Select判断语句中，如果是判断区间变量值，可以用\表达式To表达式\的形式；如果不是判断区间变量值，则关系运算表达式前面要加上Is，所以第9个空应该为Is。运用Select判断其余的情况应该用Case Else来表示，所以第10个空为Else。情况语句以Select Case开头，以End Select结束，所以第11个空应该填End Select。

8窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下： Private Sub Command1_Click() Dim x As Integer，y As Integer，z x＝3 y＝5 z＝fy(y)

Print fx(fx(x))，y End Sub

Function fx(ByVal a As Integer) a＝a＋a fx＝a

End Function

Function fy(ByRef a As Integer) a＝a＋a fy＝a

End Function

运行程序，并单击命令按钮，则窗体上显示的2个值依次是__【12】__和__【13】__。 参考答案：12 10

【解析】函数fy中的参数a是按地址传递，函数fx中 的参数a是按值传递，所以执行z＝fy(y)后，y的值为10，z的值为10，x的值为3，而执行fx(fx(x))后，fx(fx(x))的为12。

9窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c：\\test.txt，并将文件中的内容(多行文本)显示在文本框中。下面是实现此功能的程序，请填空。

Private Sub Command1_Click() Text1＝\

Number＝FreeFile

Open \：\\test.txt\Do While Not EOF(__【14】__) Line Input #Number，s

Text1.Text＝Text1.Text＋__【15】__＋Chr(13)＋Chr(10) Loop

Close Number End Sub

参考答案：Number s

【解析】EOF函数的格式为EOF(文件号)，用于测试文件指针是否到达文件末尾，因此第14个空应填文件号Number；Line函数返回文件中一行的数据，要将文件中的内容在文本框中显示，就要用Text1.Text连接上s再连接回车换行，所以第15个空应该填文件中的内容s。

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库C语言(3)在线全文阅读。