编写如下程序代码： Option Base 1 Private ...

单项选择题

下列叙述中错误的是( )。

A．二叉链表是二叉树的存储结构
B．循环链表是循环队列的存储结构
C．栈是线性结构
D．循环队列是队列的存储结构

单项选择题

循环队列的存储空间为Q(1：100)，初始状态为front=rear=100。经过一系列正常的入队与退队操作后，front=rear=99，则循环队列中的元素个数为( )。

A．1
B．2
C．99
D．0或100

单项选择题

现有表示患者和医疗的关系如下：P(P#，Pn，Pg，By)，其中P#为患者编号，Pn为患者姓名，Pg为性别，By为出生日期，Tr(P#，D#，Date，Rt)，其中D#为医生编号，Date为就诊日期，Rt为诊断结果。检索在1号医生处就诊的病人姓名的表达式是( )。

A．

B．π _P# (σ _D#=1 (Tr))
C．π _Pn (P)
D．

单项选择题

下列Visual Basic变量名中，正确的是( )。

A．tag_Integer
B．Dim
C．2_num
D．Print-n

单项选择题

下列Visual Basic函数中，计算结果为字符串型的是( )。

A．InStr
B．Val
C．Trim
D．Sgn

单项选择题

使用Open语句可以打开或建立文件，并同时指定文件的输入输出方式。下列输入输出方式中错误的是( )。

A．Random
B．Output
C．Sequential
D．Append

单项选择题

以下叙述中，错误的是( )。

A．缺省状态下，启动Visual Basic后，可在工具箱窗口中找到通用对话框控件的图标
B．通用对话框显示的对话框类型可以通过Action属性设置
C．通用对话框显示的对话框类型可以通过相应的方法进行设置
D．程序运行时，通用对话框控件不可见

单项选择题

表示“x+y小于10且x—y大于或等于6”的Visual Basic表达式是( )。

A．x+y＜10｜｜x—y≥6
B．x+y＜10&&x-y≥6
C．x+y＜10 Or x—y>=6
D．x+y＜10 And x—y＞=6

单项选择题

以下叙述中错误的是( )。

A．程序运行过程中装入窗体时，系统自动触发该窗体的Load事件
B．Visual Basic应用程序只能以解释方式执行
C．打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
D．事件过程是一段程序，当相应事件发生时被调用

单项选择题

下列说法中正确的是( )。

A．控件数组中所包含的各控件的Index属性值可以相同
B．Erase语句的作用是释放静态数组中各元素所占的内存空间
C．控件数组中所包含的各控件的Name属性值不能相同
D．数组下标的下界可以是负数

单项选择题

设有变量声明：Dim a，b As Integer，c!，d％，e#，f As Long其中所有的整型变量是( )。

A．b，d，f
B．a，b，d，f
C．b，c，f
D．b，d

单项选择题

设在窗体模块中有如下类型定义： Public Type Rec num As Integer name As String End Type下面关于这一类型定义的叙述中正确的是( )。

A．这是一个正确的类型定义
B．因为在Type Rec前面使用了关键字Public，所以是错误的
C．因为其中的name元素没有被定义为定长字符串，所以是错误的
D．自定义类型不能写在窗体模块中，所以是错误的

单项选择题

以下声明数组和给数组赋值的语句中，正确的是( )。

A．Dim x As Variant x=Array(1，2，3，4，5，6)
B．Dim x(6)As String x=“ABCDEF”
C．Dim x(6)．As Integer x=Array(1，2，3，4，5，6)
D．Dim x(2)，y(2)As Integer x(0)=1：x(1)=2：x(2)=3 y=x

单项选择题

窗体上有1个名称为Commandl的命令按钮，在设计模式下，双击Command1，将打开( )。

A．属性窗口
B．代码窗口
C．工程资源管理器窗口
D．工具箱窗口

单项选择题

名称为List1的列表框中已有若干列表项，为了使选中的列表项重复出现在列表的最后，应使用的语句为( )。

A．Listl．List，(Listl．ListCount)=Listl．List(Listl．Listlndex)
B．Listl．List(Listl．ListCount+1)=Listl．List(I~istl．Listlndex)
C．Listl．List(ListCount)=Listl．List(L,istlndex)
D．Listl．List(Listl．ListCount)=List(Listl．Listlndex)

单项选择题

下列关于计时器控件的描述中，正确的是( )。

A．计时器只有1个事件，即Timer事件
B．Interval属性以微秒为单位设置计时器事件产生的间隔
C．可以根据需要在窗体上调整计时器的大小
D．可以通过属性设置决定计时器是否在窗体上可见

单项选择题

窗体上有1个名称为Commandl的命令按钮，能够使其向左移动100的语句是( )。

A．Commandl．Left=Commandl．Left+100
B．Commandl．Left=Commandl．Left-100
C．Commandl．Move一100
D．Commandl．Move 100

单项选择题

以下叙述中错误的是( )。

A．一个工程只能有一个窗体
B．当文本框得到输入焦点时，触发其GotFocus事件
C．可以将计时器控件的Enabled属陛设置为False，使其不能自动触发Timer事件
D．如果要在菜单中添加一条分隔线，在设计菜单时应将该菜单项的标题设置为“一”

单项选择题

以下叙述中正确的是( )。

A．要获取滚动条上滚动块的位置值，应使用其Value属性
B．语句Timerl．Interval=2的作用是使计时器Timerl每隔2秒自动触发一次Timer事件
C．当复选框控件被选中时，其Value属性的值为True
D．当滚动条中前滚动块被移动时,会触发其Moved事件

单项选择题

在窗体上画一个名称为Dirl的目录列表框，一个名称为Filel的文件列表框。当改变当前目录时，文件列表框中同步显示目录列表框中当前被打开目录中的文件，则所使用的事件过程是( )。

A．Private Sub Dirl_Change() Filel．Path=Dirl．Path End Sub
B．Private Sub Dirl_Change() Filel．Path=Dirl．Drive End Sub
C．Private Sub Dirl_Change() Dirl．Path=Filel．Path End Sub
D．Private Sub Dirl—Change() Filel．Drive=Dirl．Path End Sub

单项选择题

设文本框的PasswordChar属性被设置为“％”。程序运行时，在文本框中输入了“OK”，则产生的结果是 ( )。

A．在文本框中显示2个“％”字符，但Text属性的值是“OK”
B．在文本框中显示2个“冰”字符，但Text属性的值是“OK”
C．在文本框中显示2个“％”字符，Text属性的值是“％％”
D．在文本框中显示“OK”，而Text属性的值是“％％”

单项选择题

能够容纳其他控件的控件是容器控件，框架与图片框都是容器控件。下面的叙述中正确的是( )。

A．当图片框移动时，里面的控件也随之移动，而框架不能
B．图片框可以容纳能显示图片的控件(例如图像框)，而框架不能
C．在图片框中可以用Print方法输出文本，而框架不能
D．上述都是错误的

单项选择题

工程中有2个窗体，名称分别是Form1、Form2，Form1是启动窗体。Form1上有1个名称为Commandl的命令按钮。为了在单击Commandl按钮时能够在Form2窗体上显示“OK”，应在Commandl的Click事件过程中编写的代码是( )。

A．Print Form2“OK”
B．Forml．Print“OK”
C．Print“OK”
D．Form2．Print“OK”

单项选择题

窗体上有2个名称分别为Text1、Text2的文本框，1个名称为Command1的命令按钮。编写如下程序代码： Private Sub Form—Load() Textl．Text=“” Text2．Text=“” End Sub Private Sub Commandl—Click() x=Val(Text1．Text+Text2．Text) Print x End Sub程序运行时，在文本框Text1中输入“234”，在文本框Text2中输入“432”，然后单击Commandl，输出结果为( )。

A．24
B．432234
C．234432
D．666

单项选择题

窗体上有1个名称为Listl的列表框，1个名称为Textl的文本框。编写如下程序代码： Private Sub Form—Load() Listl．AddItem“花卉” Listl．Addhem“绿植” Listl．Addhem“盆景” Textl．Text=“” End Sub Private Sub Listl—DblClick() Print Listl+Textl．Text End Sub程序运行时，在文本框中输入“摆放”，然后双击列表框中的“绿植”，输出结果为( )。

A．摆放
B．摆放绿植
C．绿植
D．绿植摆放

单项选择题

编写如下程序代码： Option Base 1 Dim nit()As Integer Private Sub Command I_Click() Dim i As Integer，j As Integer ReDim art(3．2) For i=1 To 3 For j=1 To 2 aiT(i，j)=i+j Next j Next i ReDim arr(3，4) For j=3 To 4 alT(3，j)=j+6 Next j Print arr(3，2)+arr(3，4) End Sub程序运行后，单击命令按钮Commandl，输出结果为( )。

A．15
B．12
C．13
D．10

单项选择题

有如下程序代码： Private Sub Form Click() Dim x As Integer，y As Integer，Bum As Integer x=3 y=x Do Until x>=6 nun=x*y Print“Bum=”：Bum x=x+y y=y+x LoopEnd Sub下列程序代码仅修改了循环语句，循环体未变，其中运行结果不变的是( )。

A．Private Sub Form—Click() Dim x As Integer，y As Integer，Bum As Integer x=3 y=x Do While x<6 Bum=x*y Print“num=”：num x=x+y y=y+x Loop End Sub
B．Private Sub Form_Click() Dim X As Integer，y As Integer，Bum As Integer x=3 y=x Do Until x>6 num=x*y Print“hum=”：hum x=x+y y=y+x Loop End Sub
C．Private Sub Form_Click() Dim x As Integer，y As Integer，num As Integer x=3 y=x Do While x<=6 num=x*y Print“Bum=”：Bum x=x+y y=y+x Loop End Sub
D．Private Sub Form—Click() Dim X As Integer，y As Integer，aura As Integer x=3 y=x Do While x>=6 num=x*y Print“Bum=”；Bum x=x+y y=y+x Loop End Sub

单项选择题

编写如下程序代码： Option Base 1 Private Sub Form Click() Dim x．t Dim i As Integer Dim n As Integer X=Array(一8，20，15，10，一30，13，17) n=UBound(X) For i=l To n／2 t=x(i) x(i)=x(n—i+1) x(n—i+1)=t Next i Print x(n) End Sub当程序运行时，单击窗体产生的输出结果为( )。

A．20
B．17
C．10
D．一8

单项选择题

在窗体上画三个名称分别为Text1、List1和Command1的文本框、列表框和命令按钮，且List1中有若干列表项，Text1的内容为空，然后编写如下事件过程： Private Sub Commandl Click() Dim i As Integer If Textl．Text=“”Then Exit Sub End If If Listl．ListIndex<>一l Then Listl．List(Listl．ListIndex)=Textl．Text Else Listl．AddItem Textl．Text End If Textl．Text=“” End Sub 以下叙述中正确的是( )。

A．程序的功能是从Listl中删除一个列表项
B．程序的功能是把Listl中选中的列表项内容显示在Textl中
C．程序的功能是将Textl中的文本添加到Listl中选中的列表项之后
D．程序运行时，如果Textl中没有输入任何文本，则单击Commandl时程序不进行其他操作

单项选择题

在窗体上画一个名称为Commandl的命令按钮，编写如下程序代码 Private Tvpe Student sn As String10 class As String20 score As Double End Type Private Sub Commandl—Click() Dim S As Student Dim sl As Student Open“C：＼Scorelist．dat”For Random As#1 Len=Len(s) S．sn=“张一帆” s．class=“计2014—1班” S．score=90 Put#1，．s Close#1 End Sub以下叙述中正确的是( )。

A．若文件C：＼Scorelist．dat已存在并且有记录，单击命令按钮，可以修改文件中的一条记录
B．若文件C：＼Scorelist．dat不存在，则Open语句执行中出现“文件未找到”的错误
C．文件C：＼Scorelist．dat中的每条记录长度可以不同，但记录最长为Len(s)
D．定义记录类型Student的Type语句可以移到事件过程Commandl—Click中

单项选择题

有下面事件过程： Private Sub Commandl_Click() a=5 b=8 For k=1 To 30 C=b—a a=b b=c Next k Print c End Sub上面事件过程执行后产生的输出是( )。

A．3
B．8
C．一5
D．一8

单项选择题

函数fun如下： Private Function fun(ch As String)As Integer Dim n％，st$，C$ For k=1 To Len(ch) C=Mid(ch，k，1) If C<>“A”Then st=st&c Else n=n+1 End If Next k ch=st fun=n End Function 函数的功能是( )。

A．从字符串ch中删除所有字符“A”，返回值为删除的个数
B．从字符串ch中删除所有字符“A”，返回值为删除后的字符串
C．统计字符串ch中字符“A”的个数并返回
D．把字符串ch中不等于“A”的字符都改成“A”，返回值为修改的个数

单项选择题

窗体上有1个名称为L,istl的列表框，其中有若干列表项，并有下面程序代码：…P—rivate Sub Listl—DblClick() Exchange Listl．Listl．ListIndexEnd SubPrivate Sub Exchange(Source As ListBox，k As Integer) k％=Source．ListIndex ch=Source．List(k) Source．RemoveItem k Source．AddItem Source．List(Source．ListCount一1)，k Source．Removeltem Source．ListCount一1 Source．Addltem chEnd Sub程序运行后，双击某个列表项，产生的结果是( )。

A．被双击的列表项与最后一个列表项互换位置
B．被双击的列表项被删除
C．被双击的列表项移到最前面
D．被双击的列表项移到最后面

你可能感兴趣的试题

下列叙述中错误的是( )。

循环队列的存储空间为Q(1：100)，初始状态为front=rear=100。经过一系列正常的入队与退队操作后，front=rear=99，则循环队列中的元素个数为( )。

下列数据结构中，不能采用顺序存储结构的是( )。

某系统结构图如下图所示该系统结构图的宽度是( )。

软件测试用例包括( )。

软件生存周期中，解决软件“怎么做”的阶段是( )。

设一棵树的度为4，其中度为4，3，2，1的结点个数分别为2，3，3，0。则该棵树中的叶子结点数为( )。

用树型结构表示实体之间联系的模型是( )。

关系数据模型的三个组成部分中不包括( )。

下列Visual Basic变量名中，正确的是( )。

下列Visual Basic函数中，计算结果为字符串型的是( )。

使用Open语句可以打开或建立文件，并同时指定文件的输入输出方式。下列输入输出方式中错误的是( )。

以下叙述中，错误的是( )。

表示“x+y小于10且x—y大于或等于6”的Visual Basic表达式是( )。

以下叙述中错误的是( )。

下列说法中正确的是( )。

设有变量声明：Dim a，b As Integer，c!，d％，e#，f As Long其中所有的整型变量是( )。

设在窗体模块中有如下类型定义： Public Type Rec num As Integer name As String End Type下面关于这一类型定义的叙述中正确的是( )。

以下声明数组和给数组赋值的语句中，正确的是( )。

窗体上有1个名称为Commandl的命令按钮，在设计模式下，双击Command1，将打开( )。

名称为List1的列表框中已有若干列表项，为了使选中的列表项重复出现在列表的最后，应使用的语句为( )。

下列关于计时器控件的描述中，正确的是( )。

窗体上有1个名称为Commandl的命令按钮，能够使其向左移动100的语句是( )。

以下叙述中错误的是( )。

以下叙述中正确的是( )。

在窗体上画一个名称为Dirl的目录列表框，一个名称为Filel的文件列表框。当改变当前目录时，文件列表框中同步显示目录列表框中当前被打开目录中的文件，则所使用的事件过程是( )。

设文本框的PasswordChar属性被设置为“％”。程序运行时，在文本框中输入了“OK”，则产生的结果是 ( )。

能够容纳其他控件的控件是容器控件，框架与图片框都是容器控件。下面的叙述中正确的是( )。

工程中有2个窗体，名称分别是Form1、Form2，Form1是启动窗体。Form1上有1个名称为Commandl的命令按钮。为了在单击Commandl按钮时能够在Form2窗体上显示“OK”，应在Commandl的Click事件过程中编写的代码是( )。

有如下程序代码： Private Sub Form Click() Dim x As Integer，y As Integer，Bum As Integer x=3 y=x Do Until x>=6 nun=x*y Print“Bum=”：Bum x=x+y y=y+x LoopEnd Sub下列程序代码仅修改了循环语句，循环体未变，其中运行结果不变的是( )。

有下面事件过程： Private Sub Commandl_Click() a=5 b=8 For k=1 To 30 C=b—a a=b b=c Next k Print c End Sub上面事件过程执行后产生的输出是( )。

函数fun如下： Private Function fun(ch As String)As Integer Dim n％，st$，C$ For k=1 To Len(ch) C=Mid(ch，k，1) If C<>“A”Then st=st&c Else n=n+1 End If Next k ch=st fun=n End Function 函数的功能是( )。

某系统结构图如下图所示
该系统结构图的宽度是( )。