窗体上有名称为Command1的命令按钮，名称分别为Label1、Label...

单项选择题

窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下：Private Sub Command1_Click()　　CD1.Filter＝"All File|.|Text File|.txt|Word|.Doc"　　CD1.FilterIndex＝2　　CD1.FileName＝"E：\Test.ppt"　　CD1.InitDir＝"E："　　CD1.ShowOpenEnd Sub关于上述程序，以下叙述中正确的是(　　)。

A．初始过滤器为"*.*"
B．指定的初始目录为"E："
C．以上程序代码实现打开文件的操作
D．由于指定文件类型是.ppt，所以导致打开文件的操作失败

单项选择题

窗体的MouseUp事件过程如下：Private Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single)　　……End Sub关于以上定义，以下叙述中错误的是(　　)。

A．根据Shift参数，能够确定使用转换键的情况
B．根据X、Y参数可以确定触发此事件时鼠标的位置
C．Button 参数的值是在MouseUp事件发生时，系统自动产生的
D．MouseUp是鼠标向上移动时触发的事件

单项选择题

编写如下程序：Private Sub Command1_Click()　　Dim i As Integer， j As Integer　　n＝InputBox("输入一个大于1的正整数")　　For i＝2 To n　　　　For j＝2 To Sqr(i)　　　　　　If i Mod j＝0 Then Exit For　　　　Next j　　　　If j>Sqr(i)Then Print i　　Next iEnd Sub该程序的功能是(　　)。

A．判断n是否为素数
B．输出n以内所有的奇数
C．输出n以内所有的偶数
D．输出n以内所有的素数

单项选择题

以下程序的功能是随机产生10个两位的整数：Option Base 1Private Sub Command1_Click()　　Dim a(10)As Integer　　Dim i As Integer　　Randomize　　For i＝1 To 10　　　　a(i)＝Int(Rnd * 100)＋1　　　　Print a(i)　　Next iEnd Sub运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是(　　)。

A．a(i)＝Int(Rnd * 100)
B．a(i)＝Int(Rnd * 90)＋10
C．a(i)＝Int(Rnd * 100)＋10
D．a(i)＝Int(Rnd * 101)

单项选择题

在窗体上画一个名称为Command1的命令按钮，编写如下事件过程：Private Sub Command1_Click()　　n＝0　　For i＝0 To 10　　　　X＝2 * i－1　　　　If X Mod 3＝0 Then n＝n＋1　　Next i　　Print nEnd Sub运行程序，单击命令按钮，则窗体上显示的是(　　)。

A．1
B．3
C．5
D．7

单项选择题

窗体上有名称为Command1的命令按钮，名称分别为Label1、Label2、Label3的标签。编写如下程序：Private x As IntegerPrivate Sub Command1_Click()　　Static y As Integer　　Dim z As Integer　　n＝5　　z＝z＋n　　y＝y＋n　　x＝x＋y　　Label1＝x　　Label2＝y　　Label3＝zEnd Sub运行程序，连续3次单击命令按钮后，3个标签中分别显示的是(　　)。

A．5 5 5
B．15 10 5
C．15 15 15
D．30 15 5

单项选择题

命令按钮Command1的事件过程如下：Private Sub Command1_Click()　　Dim arr(5， 5)As Integer　　Dim i As Integer， j As Integer　　For i＝1 To 4　　　　For j＝2 To 4　　　　　　arr(i， j)＝i＋j　　　　Next j　　Next i　　Print arr(1， 3)＋arr(3， 4)End Sub执行上述过程，输出结果是(　　)。

A．6
B．7
C．11
D．12

单项选择题

现有程序如下：Option Base 1Private Sub Form_Click()　　Dim x(5， 6)As Integer， y(5)As Integer　　For i＝1 To 5　　　　For j＝1 To 6　　　　　　x(i， j)＝Int(Rnd * 9＋1)　　　　Next j　　Next i　　Call f(5， 6， x， y)　　For i＝1 To 5　　　　Print y(i)；　　Next iEnd SubSub f(m As Integer， n As Integer， a()As Integer， b()As Integer)　　For i＝1 To m　　　　b(i)＝0　　　　For j＝1 To n　　　　 b(i)＝b(i)＋a(i， j)　　　　Next j　　Next iEnd Sub关于上述程序，以下叙述中正确的是(　　)。

A．调用过程语句有错，参数不匹配
B．程序有错，数组下标越界
C．y数组中保存的是x数组每行数据之和
D．x数组中数据的取值范围是1－10

单项选择题

窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：Dim n As IntegerPrivate Sub Timer1_Timer()　　ch＝Chr(n＋Asc("A"))　　Label1.Caption＝ch　　n＝n＋1　　n＝n Mod 4End Sub运行程序，将在标签中( )。

A．不停地依次显示字符"A"、"B"、"C"、"D"，直至窗体被关闭
B．依次显示字符"A"、"B"、"C"、"D"各一次
C．每隔1秒显示字符"A"一次
D．每隔1秒依次显示26个英文字母中的一个

单项选择题

窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序：Private Sub Command1_Click()　　Dim x As Integer　　x＝Val(InputBox("输入数据"))　　Text1＝Str(x＋fun(x)＋fun(x))End SubPrivate Function fun(ByRef n As Integer)　　If n Mod 3＝0 Then　　　　n＝n＋n　　Else　　　　n＝n * n　　End If　　fun＝nEnd Function对于上述程序，以下叙述中错误的是(　　)。

A．语句 fun＝n 有错，因为n是整型，fun没有定义类型
B．运行程序，输入值为5时，文本框中显示655
C．运行程序，输入值为6时，文本框中显示42
D．ByRef表示参数按址传递

单项选择题

设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下：
窗体Form1中的程序如下：Dim Flag As BooleanPrivate Sub Form_Load()　　Flag＝TrueEnd SubPrivate Sub mnu1_Click(index As Integer)　　If Index＝1 Then　　　　If Flag＝True Then　　　　　　Form2.show　　　　　　mnu1(1).Caption＝"隐藏窗体2"　　　　　　Flag＝False　　　　Else　　　　　　Form2.Hide　　　　　　mnu1(1).Caption＝"显示窗体2"　　　　　　Flag＝True　　　　End If　　End If　　If Index＝2 Then EndEnd Sub关于上述程序，以下叙述中错误的是(　　)。

A．Index属性的值可以用来区分控件数组元素
B．Index为1的菜单项的标题可能会改变
C．两个名称均为Mnu1的菜单项构成一个控件数组
D．语句Form2.Hide将Form2卸载

单项选择题

有如下程序：Private Sub Command1_Click()　　Dim i As Integer， j As Integer　　Dim sum As Integer　　n＝1　　Do　　　　j＝1　　　　Do　　　　　　sum＝sum＋j　　　　　　j＝j＋1　　　　　　Print j；　　　　Loop Until j>3　　　　n＝n＋2　　Loop Until n>10　　Print sumEnd Sub运行上述程序，外层Do循环执行的次数为(　　)。

A．4
B．5
C．7
D．10

单项选择题

以下过程的功能是从数组中寻找最大值：Private Sub FindMax(a()As Integer， ByRef Max As Integer)　　Dim s As Integer， f As Integer　　Dim i As Integer　　s＝LBound(a)　　f＝UBound(a)　　Max＝a(s)　　For i＝s To f　　　　If a(i)>Max Then Max＝a(i)　　NextEnd Sub以下关于上述过程的叙述中，错误的是(　　)。

A．语句Call FindMax(a，m)可以调用该过程，其中的a是数组，m是Integer类型变量
B．For循环次数等于a数组的元素数
C．过程末尾应该增加一条返回最大值的语句FindMax＝Max
D．参数Max用于存放找到的最大值

单项选择题

下列叙述中正确的是

A．算法的效率只与问题的规模有关，而与数据的存储结构无关
B．算法的时间复杂度是指执行算法所需要的计算工作量
C．数据的逻辑结构与存储结构是一一对应的
D．算法的时间复杂度与空间复杂度一定相关

单项选择题

下列叙述中正确的是

A．线性表链式存储结构的存储空间一般要少于顺序存储结构
B．线性表链式存储结构与顺序存储结构的存储空间都是连续的
C．线性表链式存储结构的存储空间可以是连续的，也可以是不连续的
D．以上说法均错误

单项选择题

某二叉树共有12个结点，其中叶子结点只有1个。则该二叉树的深度为（根结点在第1层）

A．3
B．6
C．8
D．12

单项选择题

对长度为n的线性表作快速排序，在最坏情况下，比较次数为

A．n
B．n-1
C．n(n-1)
D．n(n-1)/2

单项选择题

结构化程序设计中，下面对goto语句使用描述正确的是

A．禁止使用goto语句
B．使用goto语句程序效率高
C．应避免滥用goto语句
D．以上说法均错误

单项选择题

下面不属于软件测试实施步骤的是

A．集成测试
B．回归测试
C．确认测试
D．单元测试

单项选择题

下面不属于软件需求分析阶段主要工作的是

A．需求变更申请
B．需求分析
C．需求评审
D．需求获取

单项选择题

一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的

A．记录
B．行
C．属性
D．元组

单项选择题

有表示公司和职员及工作的三张表，职员可在多家公司兼职。其中公司C（公司号，公司名，地址，注册资本，法人代表，员工数），职员S（职员号，姓名，性别，年龄，学历），工作W（公司号，职员号，工资），则表W的键（码）为

A．公司号，职员号
B．职员号，工资
C．职员号
D．公司号，职员号，工资

单项选择题

设计窗体时，双击窗体上没有控件的地方，打开的窗口是(　　)。

A．代码窗口
B．属性窗口
C．工具箱窗口
D．工程窗口

单项选择题

要计算x的平方根并放入变量y，正确的语句是(　　)。

A．y＝Exp(x)
B．y＝Sgn(x)
C．y＝Int(x)
D．y＝Sqr(x)

单项选择题

Print Right("VB Programming"， 2)语句的输出结果是(　　)。

A．VB
B．Programming
C．ng
D．2

单项选择题

在某个事件过程中定义的变量是(　　)。

A．局部变量
B．窗体级变量
C．全局变量
D．模块变量

单项选择题

Print Format(1234.56， "###.#")语句的输出结果是（）。

A．123.4
B．1234.6
C．1234.5
D．1234.56

单项选择题

表达式12 / 2\4的值是(　　)。

A．1.5
B．2
C．4
D．1

单项选择题

以下过程定义中正确的过程首行是(　　)。

A．Private Sub Proc(Optional a as Integer，b as Integer)
B．Private Sub Proc(a as Integer)as Integer
C．Private Sub Proc(a()As Integer)
D．Private Sub Proc(ByVal a()As Integer)

单项选择题

如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项(　　)。

A．不显示
B．显示但无效
C．有效可用
D．不显示但有效可用

单项选择题

顺序文件在一次打开期间(　　)。

A．只能读，不能写
B．只能写，不能读
C．既可读，又可写
D．或者只读，或者只写

单项选择题

要使图像框(Image)中的图像能随着图像框的大小伸缩，应该设置的属性及值是(　　)。

A．AutoSize值为True
B．AutoRedraw值为True
C．Stretch值为True
D．BorderStyle值为0

单项选择题

如果在框架中画了2个复选框，且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True，则下面叙述中正确的是(　　)。

A．2个复选框可用
B．2个复选框不可用
C．2个复选框不显示
D．上述都不对

单项选择题

下列数组定义中错误的是(　　)。

A．Dim a(－5 To－3)
B．Dim a(3 To 5)
C．Dim a(－3 To－5)
D．Dim a(－3 To 3)

你可能感兴趣的试题

若要使文本框能够输入多行文本，应该设置的属性是( )。

设运行程序时弹出的菜单如图所示.关于该菜单，以下叙述中错误的是( )。

以下关于单选按钮和复选框的叙述中，正确的是( )。

窗体上有一个名称为VScroll1的垂直滚动条，要求程序运行时，滚动块的初始位置在最下端，应该使VScroll1.Value的值等于( )。

窗体上有一个列表框控件List1。以下叙述中错误的是( )。

以下关于命令按钮的叙述中正确的是( )。

窗体的MouseUp事件过程如下：Private Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single) ……End Sub关于以上定义，以下叙述中错误的是( )。

编写如下程序：Private Sub Command1_Click() Dim i As Integer， j As Integer n＝InputBox("输入一个大于1的正整数") For i＝2 To n For j＝2 To Sqr(i) If i Mod j＝0 Then Exit For Next j If j>Sqr(i)Then Print i Next iEnd Sub该程序的功能是( )。

在窗体上画一个名称为Command1的命令按钮，编写如下事件过程：Private Sub Command1_Click() n＝0 For i＝0 To 10 X＝2 * i－1 If X Mod 3＝0 Then n＝n＋1 Next i Print nEnd Sub运行程序，单击命令按钮，则窗体上显示的是( )。

命令按钮Command1的事件过程如下：Private Sub Command1_Click() Dim arr(5， 5)As Integer Dim i As Integer， j As Integer For i＝1 To 4 For j＝2 To 4 arr(i， j)＝i＋j Next j Next i Print arr(1， 3)＋arr(3， 4)End Sub执行上述过程，输出结果是( )。

有如下程序：Private Sub Command1_Click() Dim i As Integer， j As Integer Dim sum As Integer n＝1 Do j＝1 Do sum＝sum＋j j＝j＋1 Print j； Loop Until j>3 n＝n＋2 Loop Until n>10 Print sumEnd Sub运行上述程序，外层Do循环执行的次数为( )。

下列叙述中正确的是

下列叙述中正确的是

某二叉树共有12个结点，其中叶子结点只有1个。则该二叉树的深度为（根结点在第1层）

对长度为n的线性表作快速排序，在最坏情况下，比较次数为

结构化程序设计中，下面对goto语句使用描述正确的是

下面不属于软件测试实施步骤的是

下面不属于软件需求分析阶段主要工作的是

一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的

设计窗体时，双击窗体上没有控件的地方，打开的窗口是( )。

要计算x的平方根并放入变量y，正确的语句是( )。

Print Right("VB Programming"， 2)语句的输出结果是( )。

在某个事件过程中定义的变量是( )。

Print Format(1234.56， "###.#")语句的输出结果是（）。

表达式12 / 2\4的值是( )。

以下过程定义中正确的过程首行是( )。

如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项( )。

顺序文件在一次打开期间( )。

要使图像框(Image)中的图像能随着图像框的大小伸缩，应该设置的属性及值是( )。

如果在框架中画了2个复选框，且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True，则下面叙述中正确的是( )。

下列数组定义中错误的是( )。

若要使文本框能够输入多行文本，应该设置的属性是(　　)。

设运行程序时弹出的菜单如图所示.关于该菜单，以下叙述中错误的是(　　)。

以下关于单选按钮和复选框的叙述中，正确的是(　　)。

窗体上有一个名称为VScroll1的垂直滚动条，要求程序运行时，滚动块的初始位置在最下端，应该使VScroll1.Value的值等于(　　)。

窗体上有一个列表框控件List1。以下叙述中错误的是(　　)。

以下关于命令按钮的叙述中正确的是(　　)。

窗体的MouseUp事件过程如下：Private Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single)　　……End Sub关于以上定义，以下叙述中错误的是(　　)。

设计窗体时，双击窗体上没有控件的地方，打开的窗口是(　　)。

要计算x的平方根并放入变量y，正确的语句是(　　)。

Print Right("VB Programming"， 2)语句的输出结果是(　　)。

在某个事件过程中定义的变量是(　　)。

表达式12 / 2\4的值是(　　)。

以下过程定义中正确的过程首行是(　　)。

如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项(　　)。

顺序文件在一次打开期间(　　)。

要使图像框(Image)中的图像能随着图像框的大小伸缩，应该设置的属性及值是(　　)。

如果在框架中画了2个复选框，且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True，则下面叙述中正确的是(　　)。

下列数组定义中错误的是(　　)。