【计算机类职业资格】二级VISUAL+BASIC真题2016年03月及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC真题2016年03月及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC真题2016年03月及答案解析.doc（21页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 真题 2016 年 03 月及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：40.00)1.窗体上的 3 个命令按钮构成名称为 Command1 的控件数组，如图所示。 （分数：1.00）A.Print Command1(2).Caption 语句有错B.在窗体上显示“命令按钮 2”C.在窗体上显示“命令按钮 3”D.在窗体上显示“计算机等级考试”2.在窗体上画一个名称为 Command1 的命令按钮，再画两个名称分别为 Label1、Label2 的标签，然后编写如下程序代码： Private X As Integer P

2、rivate Sub Command1_Click() X=5: Y=3 Call proc(X,Y) Label1.Caption=X Label2.Caption=Y End Sub Private Sub proc(a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是_。（分数：1.00）A.25 和 3B.5 和 3C.25 和 6D.5 和 63.下列数据结构中，能够按照“先进后出”原则存取数据的是_。（分数：1.00）A.循环队列B栈C.队列D.二叉树4.设有如下通用过程：

3、Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=“ “ strL=Len(xStr) i=1 Do While i=strL/2 tStr=tStr Loop End Sub（分数：1.00）A.31427B.111C.149D.0009.用来设置文字字体是否斜体的属性是_。（分数：1.00）A.FontUnderdineB.FontBoldC.FontSlopeD.FontItalic10.现有如下程序： Private Sub Command1_Click() s=0

4、For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer) If x=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是_。（分数：1.00）A.38B.49C.61D.7011.窗体上有一个名称为 CD1 的通用对话框控件和由 4 个命令按钮组成的控件数组 Command1，其下标从左到右分别为 0、1、2、3。窗体外观如图所示。 （分数：1.00）A.单击“打开”按钮，显示打开文件的对话框B.单击“保存”按钮，显示保存文件的

5、对话框C.单击“打印”按钮，能够设置打印选项，并执行打印操作D.单击“退出”按钮，结束程序的运行12.设窗体上有名称为 Option1 的单选按钮，且程序中有语句：If Option1.Value= True Then 下面语句中与该语句不等价的是_。（分数：1.00）A.If Option1.Value ThenB.If Option1=True ThenC.If Value=True ThenD.If Option1 Then13.窗体上有一个名称为 Picture1 的图片框控件。一个名称为 Label1 的标签控件，如图所示。 （分数：1.00）A.程序运行时会出错B.单击图片框，在图

6、片框中显示一幅图片C.过程中的 x 是控件变量D.单击标签，在标签中显示一串文字14.在窗体上画一个文本框，其名称为 Text1，为了在程序运行后隐藏该文本框，应使用的语句为_。（分数：1.00）A.Text1.ClearB.Text1.Visible=FalseC.Text1.HideD.Text1.Enabled=False15.设有如图所示窗体和以下程序： Private Sub Command1_Click() Text1.Text=“Visual Basic“ End Sub Private Sub Text1_LostFocus() If Text1.Text“BASIC“ The

7、n Text1.Text=“ “ Text1.SetFocus End If End Sub 程序运行时，在 Text1 文本框中输入“Basic”(如图所示)，然后单击 Command1 按钮，则产生的结果是_。 （分数：1.00）A.文本框中无内容，焦点在文本框中B.文本框中为“Basic”，焦点在文本框中C.文本框中为“Basic”，焦点在按钮上D.文本框中为“Visual Basic”，焦点在按钮上16.在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim M(10)As Integer For k=1

8、To 10 M(k)=12-k Next k x=8 Print M(2+M(x) End Sub 运行程序，单击命令按钮，在窗体上显示的是_。（分数：1.00）A.6B.5C.7D.817.设 a=4，b=5，c=6，执行语句 Print ab And bc 后，窗体上显示的是_。（分数：1.00）A.TrueB.FalseC.出错信息D.018.窗体上有一个名称为 Timer1 的计时器控件，一个名称为 Shape1 的形状控件，其 Shape 属性值为3(Circle)。编写程序如下： Private Sub Form_Load() Shape1.Top=0 Timer1.Interva

9、l=100 End Sub Private Sub Timer1_Timer() Static x As Integer Shape1.Top=Shape1.Top+100 x=x+1 If x Mod 10=0 Then Shape1.Top=0 End If End Sub 以下关于上述程序的叙述中，错误的是_。（分数：1.00）A.每执行一次 Timer1_Timer 事件过程，x 的值都在原有基础上增加 1B.Shape1 每移动 10 次回到起点，重新开始C.窗体上的 Shape1 由下而上移动D.Shape1 每次移动 10019.在 Visual Basic 中，表达式 3*2/

10、5 Mod 3 的值是_。（分数：1.00）A.1B.0C.3D.出现错误提示20.为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是_。（分数：1.00）A.按住 Alt 键，不要松开，然后单击每个要选中的控件B.按住 Shift 键，不要松开，然后单击每个要选中的控件C.按住 Ctrl 键，不要松开，然后单击每个要选中的控件D.拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内21.设窗体上有 1 个水平滚动条，已经通过属性窗口把它的 Max 属性设置为 1，Min 属性设置为 100。下面叙述中正确的是_。（分数：1.00）A.程序运行时，若使滚动块向左移动，滚动

11、条的 Value 属性值就增加B.程序运行时，若使滚动块向左移动，滚动条的 Value 属性值就减少C.由于滚动条的 Max 属性值小于 Min 属性值，程序会出错D.由于滚动条的 Max 属性值小于 Min 属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动22.若在窗体模块的声明部分声明了如下自定义类型和数组： Private Type rec Code As Integer Caption As String End Type Dim arr(5) As rec 则下面的输出语句中正确的是_。（分数：1.00）A.Print arr.Code(2),arr.Caption(2)B.

12、Print arr.Code,arr.CaptionC.Print arr(2).Code,arr(2).CaptionD.Print Code(2),Caption(2)23.设窗体上有一个标签 Label1 和一个计时器 Timer1，Timer1 的 Interval 属性被设置为 1000，Enabled属性被设置为 True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是_。（分数：1.00）A.Private Sub Timer1_Timer()Label1.Caption=TrueEnd SubB.Private Sub Timer1_Timer

13、()Label1.Caption=Time $End SubC.Private Sub Timer1_Timer()Label1.Interval=1End SubD.Private Sub Timer1_Timer()For k=1 To Timer1.IntervalLabel1.Caption=TimerNext kEnd Sub24.执行下列语句： strInput=InputBox(“请输入字符串“,“字符串对话框“,“字符串“) 将显示输入对话框。此时如果直接单击“确定”按钮，则变量 strInput 的内容是_。（分数：1.00）A.“请输入字符串“B.“字符串对话框“C.“字符

14、串“D.空字符串25.数据库应用系统中的核心问题是_。（分数：1.00）A.数据库设计B.数据库系统设计C.数据库维护D.数据库管理员培训26.把数学表达式 （分数：1.00）A.(5x+3)/(2y-6)B.x*5+3/2*y-6C.(5*x+3)(2*y-6)D.(x*5+3)/(y*2-6)27.数据流图中带有箭头的线段表示的是_。（分数：1.00）A.控制流B.事件驱动C.模块调用D.数据流28.为把圆周率的近似值 3.14159 存放在变量 pi 中，应该把变量 pi 定义为_。（分数：1.00）A.Dim pi As IntegerB.Dim pi(7) As IntegerC.D

15、im pi As SingleD.Dim pi As Long29.下面是求最大公约数的函数的首部： Function gcd(ByVal x As Integer,ByVal y As Integer) As Integer 若要输出 8、12、16 这 3 个数的最大公约数，下面正确的语句是_。（分数：1.00）A.Print gcd(8，12)，gcd(12，16)，gcd(16，8)B.Print gcd(8，12，16)C.Print gcd(8)，gcd(12)，gcd(16)D.Print gcd(8，gcd(12，16)30.在软件开发中，需求分析阶段可以使用的工具是_。（分数

16、：1.00）A.N-S 图B.DFD 图C.PAD 图D.程序流程图31.在 E-R 图中，用来表示实体联系的图形是_。（分数：1.00）A.椭圆形B.矩形C.菱形D.三角形32.下列数据结构中，属于非线性结构的是_。（分数：1.00）A.循环队列B.带链队列C.二叉树D.带链栈33.有三个关系 R、S 和 T 如下： R A B C a 1 2 b 2 1 c 3 1 S A B C d 3 2 T A B C a 1 2 b 2 1 c 3 1 d 3 2 其中关系 T 由关系 R 和 S 通过某种操作得到，该操作为_。（分数：1.00）A.选择B.投影C交D并34.在窗体上画一个文本框(

17、名称为 Text1)和一个标签(名称为 Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是_。（分数：1.00）A.Private Sub Text1_Change()Label1.Caption=Str(Len(Text1.Text)End SubB.Private Sub Text1_Click()Label1.Caption=Str(Len(Text1.Text)End SubC.Private Sub Text1_Change()Label1.Caption=Text1.TextEnd SubD.Private

18、 Sub Label1_Change()Label1.Caption=Str(Len(Text1.Text)End Sub35.以下变量名中合法的是_。（分数：1.00）A.x2-1B.printC.str_nD.2x36.在软件开发中，需求分析阶段产生的主要文档是_。（分数：1.00）A.可行性分析报告B.软件需求规格说明书C.概要设计说明书D.集成测试计划37.设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表项内容的是_。（分数：1.00）A.List1.ListB.List1.ListIndexC.List1.TextD.List1.Index38.耦合性

19、和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是_。（分数：1.00）A.提高耦合性降低内聚性有利于提高模块的独立性B.降低耦合性提高内聚性有利于提高模块的独立性C.耦合性是指一个模块内部各个元素间彼此结合的紧密程度D.内聚性是指模块间互相连接的紧密程度39.为计算 n!(0n=12)编写如下函数过程： Private Function fun(n As Integer)As Long Dim p As Long p=1 For k=n-1 To 2 Step-1 p=p*k Next k fun=p End Function 在调试时发现该函数过程产生的结果是错误的，程序需要修改。下

20、面的修改方案中有 3 种是正确的，错误的方案是_。（分数：1.00）A.把 p=1 改为 p=nB.把 For k=n-1 To 2 Step-1 改为 For k=1 To n-1C.把 For k=n-1 To 2 Step-1 改为 For k=1 To nD.把 For k=n-1 To 2 Step-1 改为 For k=2 To n40.以下叙述中错误的是_。（分数：1.00）A.标准模块文件的扩展名是.basB.标准模块文件是纯代码文件C.在标准模块中声明的全局变量可以在整个工程中使用D.在标准模块中不能定义过程二、基本操作题(总题数：2，分数：18.00)41.请在名称为 Fo

21、rm1 的窗体上添加一个名称为 H1 的水平滚动条，并在属性窗口中设置它的属性值，使其满足下列要求：它的最小刻度值为 1，最大刻度值为 100，在程序运行时，用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动 10 个刻度。再在滚动条下面画两个名称分别为 L1 和 L2 的标签，并分别显示 1 和 100。运行时的窗体如图 1 所示。 （分数：9.00）_42.在名称为 Form1 的窗体上添加两个名称分别为 Text1 和 Text2 的文本框，初始内容均为空；再建立一个下拉菜单，菜单标题为“操作”，名称为 M1，此菜单下含有两个菜单项，名称分别为 Copy 和 Clear，标

22、题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序运行时，单击“复制”选项菜单，则把 Text1 中的内容复制到 Text2 中；单击“清除”选项菜单，则清除 Text2 中的内容(即在 Text2 中填入空字符串)。运行时的窗体如图 1 所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。 （分数：9.00）_三、简单应用题(总题数：2，分数：24.00)43.在考生文件夹下有一个工程文件 sjt3.vbp，窗体上已经有一个标签 Label1，请添加一个单选按钮数组，名称为 Op1，含 3 个单选按钮，它们的 Index 属性分别为 0、1、2，标题依次为“飞机”、“

23、火车”、“汽车”。再添加一个名称为 Text1 的文本框。窗体文件中已经给出了 Op1 的 Click 事件过程，但不完整，要求去掉程序中的注释符，把程序中的问号改为正确的内容，使得在程序运行时单击“飞机”或“火车”单选按钮时，在 Text1 中显示“我坐飞机去”或“我坐火车去”；单击“汽车”单选按钮时，在 Text1 中显示“我开汽车去”，如下图所示。 （分数：12.00）_44.在考生文件夹下有一个工程文件 sjt4.vbp，Forrn1 窗体中有一个文本框，名称为 Text1；请先在窗体上添加两个框架控件，名称分别为 F1、F2，标题分别为“性别”、“身份”；然后在 F1 中添加两个单选

24、按钮控件 Op1、Op2，标题分别为“男”、“女”；其次在 F2 中添加两个单选按钮控件 Op3、Op4，标题分别为“学生”、“教师”；最后再添加一个命令按钮，名称为 C1，标题为“确定”，如下图所示。请编写适当的事件过程，使得运行时，在 F1、F2 中各选一个单选按钮，然后单击“确定”接钮，就可以按照表 1 把结果显示在文本框中。 （分数：12.00）_四、综合应用题(总题数：1，分数：18.00)45.以下数列：1，1，2，3，5，8，13，21的规律是从第 3 个数开始，每个数都是其前面两个数之和。 在考生文件夹下有一个工程文件 sjt5.vbp。窗体中已经给出了所有控件，如下图所示。请

25、编写适当的事件过程完成如下功能：选中一个单选按钮后，单击“计算”按钮，则计算出上述数列第 n 项的值，并在文本框中显示，n 是选中的单选按钮后面的数值(提示：因计算结果较大，应使用长整型变量)。 （分数：18.00）_二级 VISUAL+BASIC 真题 2016 年 03 月答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：40.00)1.窗体上的 3 个命令按钮构成名称为 Command1 的控件数组，如图所示。 （分数：1.00）A.Print Command1(2).Caption 语句有错B.在窗体上显示“命令按钮 2”C.在窗体上显示“命令按钮 3

26、”D.在窗体上显示“计算机等级考试” 解析：解析 控件数组的下标默认从 0 开始，所以 Index=0 对应命令按钮 1；Index=1 对应命令按钮2；Index=2 对应命令按钮 3。当单击命令按钮 2 时，Index=1，因此程序会输出“计算机等级考试”。2.在窗体上画一个名称为 Command1 的命令按钮，再画两个名称分别为 Label1、Label2 的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click() X=5: Y=3 Call proc(X,Y) Label1.Caption=X Label2.Cap

27、tion=Y End Sub Private Sub proc(a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是_。（分数：1.00）A.25 和 3 B.5 和 3C.25 和 6D.5 和 6解析：解析 X 是在窗体模块中起作用的模块变量，Y 是一个局部变量。因此 proc 过程对变量 X 和 Y 进行赋值后，X=a*a=5*5=25，使按钮单击事件中的变量 X 值变为 25；而变量 Y 并没有改变，仍是 3。3.下列数据结构中，能够按照“先进后出”原则存取数据的是_。（分数：1

28、.00）A.循环队列B栈 C.队列D.二叉树解析：解析 栈和队列都是受限的线性表。栈按照“先进后出”的原则组织数据，插入与删除操作被限制在栈顶一端进行；队列采用“先进先出”的原则组织数据。循环队列是队列的一种特殊形式。4.设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=“ “ strL=Len(xStr) i=1 Do While i=strL/2 tStr=tStr Loop End Sub（分数：1.00）A.31427B.111 C.149D.00

29、0解析：解析 a=0，x=kka=(kk)0=1。循环执行 3 次后，k=4，循环结束，所以一共输出 3 个 1。9.用来设置文字字体是否斜体的属性是_。（分数：1.00）A.FontUnderdineB.FontBoldC.FontSlopeD.FontItalic 解析：解析 FontItalic 属性用来设置文字是否为斜体；FontUnderline 属性用来设置文字是否加下划线；FontBold 属性用来设置文字是否加粗。没有 FontSlope 属性。10.现有如下程序： Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i)

30、 Next Print s End Sub Public Function f(x As Integer) If x=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是_。（分数：1.00）A.38B.49 C.61D.70解析：解析 按钮事件实现对函数过程 f 返回值的累加；函数过程 f 当参数 x 大于等于 10 时返回 x+1，否则返回 x+2。因此 s=11+11+10+9+8=49。11.窗体上有一个名称为 CD1 的通用对话框控件和由 4 个命令按钮组成的控件数组 Command1，其下标从左到右分别为 0、

31、1、2、3。窗体外观如图所示。 （分数：1.00）A.单击“打开”按钮，显示打开文件的对话框B.单击“保存”按钮，显示保存文件的对话框C.单击“打印”按钮，能够设置打印选项，并执行打印操作 D.单击“退出”按钮，结束程序的运行解析：解析 通用对话框中的 Action 不同的取值代表不同的方法：Action=1，相当于 ShowOpen 方法，可显示“打拜”文件对话框；Action=2，相当于 ShowSave 方法，可显示文件“另存为”对话框；Action=3，相当于 ShowColor 方法，可显示“颜色”对话框；Action=4，相当于 ShowFont 方法，可显示“字体”对话框；Act

32、ion=5，相当于 ShowPrinter 方法，可显示“打印”对话框。C 项错误，对话框中只能设置打印选项，不能执行打印操作。12.设窗体上有名称为 Option1 的单选按钮，且程序中有语句：If Option1.Value= True Then 下面语句中与该语句不等价的是_。（分数：1.00）A.If Option1.Value ThenB.If Option1=True ThenC.If Value=True Then D.If Option1 Then解析：解析 单选按钮控件 Option 的 Value 为 True 表示被选中。Option 的默认属性是 Value，所以Opt

33、ion1.Value 等价于 Option1。Option1.Value=True 和 Option1.Value 同真同假，用于 If 之后意义相同。13.窗体上有一个名称为 Picture1 的图片框控件。一个名称为 Label1 的标签控件，如图所示。 （分数：1.00）A.程序运行时会出错 B.单击图片框，在图片框中显示一幅图片C.过程中的 x 是控件变量D.单击标签，在标签中显示一串文字解析：解析 程序能够正常运行：单击 Picture1 控件或 Label1 控件，都会调用 display(xas Control)过程，并传入控件名。display 首先判断控件的类型：如果是标签控

34、件，就在它的标题上显示“计算机等级考试”，否则就在图片框中加载一个图片显示出来。14.在窗体上画一个文本框，其名称为 Text1，为了在程序运行后隐藏该文本框，应使用的语句为_。（分数：1.00）A.Text1.ClearB.Text1.Visible=False C.Text1.HideD.Text1.Enabled=False解析：解析 Visible 属性用来设置文本框的显示或隐藏，当属性值为 True 时文本框显示；当属性值为False 时文本框隐藏。Enabled 属性用来设置文本框可用不可用，当属性值为 True 时可在文本框中输入数据；当属性值为 False 时文本框为灰色，内容

35、不能修改。文本框没有 Clear 和 Hide 方法。15.设有如图所示窗体和以下程序： Private Sub Command1_Click() Text1.Text=“Visual Basic“ End Sub Private Sub Text1_LostFocus() If Text1.Text“BASIC“ Then Text1.Text=“ “ Text1.SetFocus End If End Sub 程序运行时，在 Text1 文本框中输入“Basic”(如图所示)，然后单击 Command1 按钮，则产生的结果是_。 （分数：1.00）A.文本框中无内容，焦点在文本框中 B.文

36、本框中为“Basic”，焦点在文本框中C.文本框中为“Basic”，焦点在按钮上D.文本框中为“Visual Basic”，焦点在按钮上解析：解析 当单击命令按钮时，文本框失去焦点，触发 LostFocus 事件。在 LostFocus 事件中，字符串“Basic”与“BASIC”不等，执行 If 语句，清空文本框，并把焦点返回到文本框中。16.在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M

37、(2+M(x) End Sub 运行程序，单击命令按钮，在窗体上显示的是_。（分数：1.00）A.6 B.5C.7D.8解析：解析 数组 M 的元素 M(k)被赋值为 12-k，所以 M(2+M(8)=M(2+(12-8)=M(6)=12-6=6。17.设 a=4，b=5，c=6，执行语句 Print ab And bc 后，窗体上显示的是_。（分数：1.00）A.True B.FalseC.出错信息D.0解析：解析 关系运算符“”比逻辑运算符“And”优先级高，应先计算“”，结果为 True And True，执行逻辑运算，结果为 True，再用 Print 语句显示。18.窗体上有一个名称

38、为 Timer1 的计时器控件，一个名称为 Shape1 的形状控件，其 Shape 属性值为3(Circle)。编写程序如下： Private Sub Form_Load() Shape1.Top=0 Timer1.Interval=100 End Sub Private Sub Timer1_Timer() Static x As Integer Shape1.Top=Shape1.Top+100 x=x+1 If x Mod 10=0 Then Shape1.Top=0 End If End Sub 以下关于上述程序的叙述中，错误的是_。（分数：1.00）A.每执行一次 Timer1_T

39、imer 事件过程，x 的值都在原有基础上增加 1B.Shape1 每移动 10 次回到起点，重新开始C.窗体上的 Shape1 由下而上移动 D.Shape1 每次移动 100解析：解析 静态变量 x 内存只分配一次，于是每执行一次 Timer1_Timer 事件 x 都会增加 1。x Mod 10表示每调用 Timer 事件过程 10 次后，就重置 Shape1 的 top 值为 0，即回到窗体顶的位置，然后由上而下移动 10。19.在 Visual Basic 中，表达式 3*2/5 Mod 3 的值是_。（分数：1.00）A.1 B.0C.3D.出现错误提示解析：解析 VB 中算术运算

40、符优先级从高到低依次为：乘方负号乘、除整除取模加、减。本题应先计算 3*2=6，然后计算 6/5=1，最后 1 Mod 3=1。20.为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是_。（分数：1.00）A.按住 Alt 键，不要松开，然后单击每个要选中的控件 B.按住 Shift 键，不要松开，然后单击每个要选中的控件C.按住 Ctrl 键，不要松开，然后单击每个要选中的控件D.拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内解析：解析 按 Shift 键可以选择鼠标两次点击之间的所有控件；按 Ctrl 键可以选择鼠标点到的控件；鼠标拖动可以选中区域内的所有控件。

41、21.设窗体上有 1 个水平滚动条，已经通过属性窗口把它的 Max 属性设置为 1，Min 属性设置为 100。下面叙述中正确的是_。（分数：1.00）A.程序运行时，若使滚动块向左移动，滚动条的 Value 属性值就增加 B.程序运行时，若使滚动块向左移动，滚动条的 Value 属性值就减少C.由于滚动条的 Max 属性值小于 Min 属性值，程序会出错D.由于滚动条的 Max 属性值小于 Min 属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动解析：解析 可以将窗体上的水平滚动条当作有刻度的直线，属性 Min=100 为左端点值，属性。Max=1为右端点值，滚动条的 Value 属

42、性值随着滚动块的移动在。Max 和 Min 之间变化。因此，若滚动块向左移动，滚动条的 Value 属性值会增加。22.若在窗体模块的声明部分声明了如下自定义类型和数组： Private Type rec Code As Integer Caption As String End Type Dim arr(5) As rec 则下面的输出语句中正确的是_。（分数：1.00）A.Print arr.Code(2),arr.Caption(2)B.Print arr.Code,arr.CaptionC.Print arr(2).Code,arr(2).Caption D.Print Code(2)

43、,Caption(2)解析：解析 引用自定义类型的数组元素的格式为：数组名(下标).成员名。23.设窗体上有一个标签 Label1 和一个计时器 Timer1，Timer1 的 Interval 属性被设置为 1000，Enabled属性被设置为 True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是_。（分数：1.00）A.Private Sub Timer1_Timer()Label1.Caption=TrueEnd SubB.Private Sub Timer1_Timer()Label1.Caption=Time $End Sub C.Private

44、 Sub Timer1_Timer()Label1.Interval=1End SubD.Private Sub Timer1_Timer()For k=1 To Timer1.IntervalLabel1.Caption=TimerNext kEnd Sub解析：解析 Timer 的 Interval 属性值用来设置间隔；Enabled 属性值用来设置定时器的开关。本题每隔 1000ms 触发一次 Timer 事件，从而执行一次 Timer 事件过程。要想在标签中每秒显示一次系统时间，则应在 Timer 事件过程中把系统时间赋给标签的 Caption 属性。24.执行下列语句： strInp

45、ut=InputBox(“请输入字符串“,“字符串对话框“,“字符串“) 将显示输入对话框。此时如果直接单击“确定”按钮，则变量 strInput 的内容是_。（分数：1.00）A.“请输入字符串“B.“字符串对话框“C.“字符串“ D.空字符串解析：解析 InputBox 函数的格式为：InputBox(Prompt，Title，Default，XPos，YPos，Helpfile，Context)，InputBox 函数返回的数据类型是字符串。本题中，提示信息为“请输入字符串”；标题栏为“字符串对话框”；默认值为“字符串”。在用户单击“确定”按钮时，InputBox 函数会返回输入文本框的

46、内容，若内容为空，则返回默认值。25.数据库应用系统中的核心问题是_。（分数：1.00）A.数据库设计 B.数据库系统设计C.数据库维护D.数据库管理员培训解析：解析 数据库设计是数据库应用系统中的核心问题。数据库系统设计与数据库应用系统无关，数据库应用系统运行过程中会设涉及到数据库维护和管理员培训。26.把数学表达式 （分数：1.00）A.(5x+3)/(2y-6)B.x*5+3/2*y-6C.(5*x+3)(2*y-6)D.(x*5+3)/(y*2-6) 解析：解析 VB 数学表达式中的乘法符号不可省略，用*表示；除法符号用/表示；表示一个整体的可加括号()。VB 中算术运算符优先级从高到

47、低依次为：乘方负号乘、除整除取模加、减。27.数据流图中带有箭头的线段表示的是_。（分数：1.00）A.控制流B.事件驱动C.模块调用D.数据流 解析：解析 数据流图中带箭头的线段表示的是数据流，即沿箭头方向传送数据的通道。一般在旁边标注数据流名。28.为把圆周率的近似值 3.14159 存放在变量 pi 中，应该把变量 pi 定义为_。（分数：1.00）A.Dim pi As IntegerB.Dim pi(7) As IntegerC.Dim pi As Single D.Dim pi As Long解析：解析 单精度 Single 或双精度 Double 的变量用来存储浮点数，整型 Integer 和长整型 Long 的变量用来存储整型数据。29.下面是求最大公约数的函数的首部： Function gcd(ByVal x As Integer