工力081新店实验安排详表1副本Word文档下载推荐.docx

1、 A）数据库系统是一个独立的系统，不需要操作系统的支持 B）数据库技术的根本目标是要解决数据的共享问题 C）数据库管理系统就是数据库系统 （10）下列叙述中正确的是。 A）为了建立一个关系，首先要构造数据的逻辑关系 B）表示关系的二维表中各元组的每一个分量还可以分成若干数据项 C）一个关系的属性名表称为关系模式 D）一个关系可以包括多个二维表 （11）要使一个文本框可以显示多行文本，应设置为True的属性是。 A）Enabled B）MultiLine C）MasLenfth D）Width （12）在窗体上有一个名为Text1的文本框。当光标在文本框中时，如果按下字母键“A”，则被调用的事件

2、过程是 A）Form_KeyPress（） B）Text1_LostFocus（） C）Text1_Click（） D）Test1_Change（）（13）设在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。要求单击Command1按钮时可把光标移到文本框中。下面正确的事件过程是。A）Private Sub Command1_Click（） B）Private Sub Text1.GotFocus Command1.GotFocus End Sub EndSub C）Private Sub Command1_Click（） D）Private Sub Text1.S

3、etFocus Command1.SetFocus End Sub （14）执行以下程序后输出的是。Private Sub Command1_Click（） Ch$=”AABCDEFGH” Print Mid（Righ（ch$,6）,Len（left（ch$,4）,2） End Sub A）CDEFGH B）ABCD C）FG D）AB （15）设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是。A）Prvate Sub List1_Click（） B）Private Sub Form1_Click（） Print Li

4、st1.Text Print List1.Text C）Private Sub List1_Click（） D）Private Sub Form1_Click（） Print Form1.Text List1.Print List1.Text （16）若窗体上的图片框中有一个命令按钮，则此按钮的Left属性是指。A）按钮左端到窗体左端的距离 B）按钮左端到图片框左端的距离 C）按钮中心点到窗体左端的距离 D）按钮中心点到图片框左端的距离 （17）为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”，若通过程序设置该标题，则应使用的语句是。A）CD1.DialogTitle=“对话框窗口”

5、 B）CD1.Action=“对话框窗口” C）CD1.FileName=“对话框窗口” D）CD1.Filter=“对话框窗口” （18）在窗体上有如右图所示的控件，各控件的名称。与其标题相同，并有如下程序： 。Private Sub Form_Load（） Command2.Enabled=False Check1.Value=1 刚运行程序时，看到的窗体外观是：（19）设在窗体中有一个名称为List1的列表框，其中有若干个项目（如图）。要求选中某一项后单击Command1按钮，就删除选中的项，则正确的事件过程是。A）Private Sub Command1_Click（） List1.C

6、lear B） Private Sub Command1_Click（） List1.Clear List1.ListIndex C） Private Sub Command1_Click（） List1.Removeltem List1.ListIndex D） Private Sub Command1_Click（） List1.Removeltem （20）某人设计了如下程序用来计算并输出7!（7的阶乘）t=0 For k=7 To 2 Step -1 t=t*k Next Print t 执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结构的是。A）把t=0改为t=1 B）把

7、For k = 7 To 2 Step -1改为For k =7 To 1 Step -1 C）把For k = 7 To 2 Stip-1改为Fork=1 To 7 D）把Next改为Nexi k （21）若窗体中已经有若干个不同的单选按钮，要把它们改为一个单选按钮数组，在属性窗口中需要且只需要进行的操作是。A）把所有单选按钮的Index属性改为相同值 B）把所有单选按钮的Index 属性改为连续的不同值 C）把所有单选按钮的Caption属性值改为相同 D）把所有单选按钮的名称改为相同，且把它们的Index属性改为连续的不同值。（22）窗体上有文本框Text1和一个菜单，菜单标题、名称如表

8、，结构见图。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是：。A）Private Sub save_Click（） B）Private Sub save_Click（） Text1.Text=file.save.Caption Text1.Text=save.Caption C）Private Sub file_Click（） D）Private Sub file_Click（） （23）某人在窗体上画了一个名称为Timer1的计时器和一个名称为Lab的属性设置为Enabled=True, Interval=0,并编程如下。希望在每2秒在标签

9、上显示一次系统当前时间。Private Sub Timer1_Timer（） Label1.Caption=Time$ 在程序执行时发现未能实现上述目的，那么，他应做的修改是。A）通过属性窗口把计时器的Interval属性设置为2000 B）通过属性窗口把计时器的Enabled属生设置为False C）把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Tims$ D）把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time （24）形状控件的Shape属性有6种取值，分别代表6种几何图形。下列

10、不属于这6种几何图形的是。（25）下面关于文件的叙述中错误的是。A）随机文件中各条记录的长度是相同的 B）打开随机文件时采用的文件存取方式应该是Random C）向随机文件中写数据应使用语句Print#文件号 D）打开随机文件与打开顺序文件一样，都使用Open语句 （26）设窗体上有一个图片框Picture1，要在程序运行期间装入当前文件夹下的图形文件File1.jpg，能实现此功能的语句是。A）Picture1.Picture=”Flie1.jpg B）Picture1.Picture=LoadPicture（“File1.jpg”） C） LoadPicture（“File1.jpg”）D

11、）Call LoadPicture（“File1.jpg”） （27）下面程序执行时，在窗体上显示的是。Dim a（10） For k = 1 To 10 a（k） = 11 k Next k Print a（a（3）a（7） Mod a（5） A）3 B）5 C）7 （28）为达到把a、b中的值交换后输出的目的，某人编程如下：a% = 10:b% = 20 Call swap（a,b） Print a,b Private Sub swap（ByVal a As Integer,ByVal b As Integer） c= a:a=b:b=c 在运行时发现输出结果错了，需要修改。下面列出的错误

12、原因和修改方案中正确的是。A）调用swap过程的语句错误，应改为Call swap a,b B）输出语句错误，应改为：Print ”a”,”b” C）过程的形式参数有错，应改为：swap（ByRef a As Integer,ByRef b As Integer） D）swap中3条赋值语句的顺序是错误的，应改为a=b:b=c:c=a （29）有如下函数：Function fun（a As Integer,n As Integer） As Integer Dim m As Integer While a =n a=a-n m= m+1 Wend fun=m End Function 该函数的返

13、回值是 。A）a乘以n的乘积 B）a加n的和 C）a减n的差 D）a除以n的商（不含小数部分） （30）下面程序的输出结果是。ch$=”ABCDEF” proc ch Print ch Private Sub proc（ch As String） S=” For k=Len（ch） To 1 Step-1 s=s&Mid（ch,k,1） ch=s A）ABCDEF B）FEDCBA C）A D）F （31）某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：Function MaxValue（a（） As Integer） As Integer Dim max% max=1 F

14、or k = 2 To 10 If a（k）a（max） Then max = k End If MaxValue = max 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是。A）语句max = 1应改为max = a（1） B）语句For k = 2 To 10应改为For k = 1 To 10 C）If语句中的条件a（k）a（max）应改为a（k）max D）语句MaxValue = max 应改为MaxValue = a（max） （32）在窗体上画一个名称为Command1的命令按钮，并编写以下程序：Dim n%,b,t t = 1:b = 1:n = 2

15、 Do b = b*n t = t + b n = n +1 Loop Until n9 此程序计算并输出一个表达式的值，该表达式是。A）9！ B）10！ C）1！+2！+9！ D）1！+10！（33）有一个名称为Form1的窗体，上面没有控件，设有以下程序（其中方法Pset（X,Y）的功能是在坐标X，Y处画一个点）：Dim cmdmave As Boolean Private Sub Form_MouseDown（Button As Integer,Shift As Integer, X As Single,Y As Single） cmdmave = True Private Sub Fo

16、rm_MouseMove（Button As Integer,Shift As Integer, X As Single, Y As Single） If cmdmave Then Form1.Pset（X,Y） Private Sub Form_MouseUp（Button As Integer, Shift As Integer, X As Single,Y As Single） cmdmave = False 此程序的功能是。A）每按下鼠标键一次，在鼠标所指位置画一个点 B）按下鼠标键，则在鼠标所指位置画一个点；放开鼠标键，则此点消失 C）不按鼠标键而拖动鼠标，则沿鼠标拖动的轨迹画一条线

17、 D）按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线 （34）某人设计了下面的函数fun，功能是返回参数a中数值的位数Function fun（a As Integer） As Integer Dim n% n = 1 While a 10 = 0 n = n + 1 a = a 10 fun = n 在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是。A）把语句n = 1改为n = 0 B）把循环条件a 10 = 0改为a 10 0 C）把语句 a = a 10改为a = a Mod 10 D）把语句fun = n改为 fun = a （35）

18、在窗体上有一个名称为Check1的复选框数组（含4个复选框），还有一个名称为Text1的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的方字罗列在文本框中（见图）。下面能实现此功能的事件过程是。A）Private Sub Check1_Click（Indes As Integer） Text1.Text =For k = 0 To 3 If Check1（k）.value = 1 Then Text1.Text = Text1.Text & Check1（k）.Caption & 双引号中是空格 B）Private Sub Check1_Click（Index As

19、 Integer） If Check1（k）.Value = 1 Then C）Private Sub Check1_Click（Index As Integer） Text1.Text = Check1（Index）.Caption &D）Private Sub Check1_Click（Index As Integer） Exit For 二、填空题（每空2分，共30分） 请将每空的正确答案写在答题卡115序号的横线上，答在试卷上不得分。（1）软件需求规格说明书应具有完整性，无岐义性、正确性、可验证性、可修改性等特征，其中最重要的是【1】 。（2）在两种基本测试方法中， 【2】 测试的原则

20、之一是保证所测模块中每一个独立路径至少执行一次。（3）线性表的存储结构主要分为顺序存储结构和链式存储结构。队列是一种特殊的线性表，循环队列是队列的【3】 存储结构。（4）对下列二叉树进行中序遍历的结果为【4】（5）在E-R图中，矩形表示【5】（6）窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如：单击图1中的“重庆”，则与“北京”交换，得到图2的结果。下面是可实现此功能的程序，请填空。Private Sub Combo1_Click（） Dim temp temp = Combo1.Text 6 = Combo1.List（0） Combo1.List（0） = temp （7）设窗体上有一个名称为HScroIII的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离（即新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数）。下面是可实现此功能的程序，请填写。Dim 7 As Integer pos=HScroIII.Value Private Sub HScroIII_Change（）