设a=5，b=10，执行语句c=Int((b-a)*Rnd+a)+1后，c中...

单项选择题

循环队列的存储空间为Q(1:50)，初始状态为front=rear=50。经过一系列正常的入队与退队操作后，front=rear=25，此后又正常地插入了一个元素，则循环队列中的元素个数为______。

A．51
B．50
C．49
D．1

单项选择题

下列选项中属于软件设计建模工具的是______。

A．DFD图(数据流程图)
B．程序流程图(PFD图)
C．用例图(USE_CASE图)
D．网络工程图

单项选择题

下列描述正确的是______。

A．软件测试是指动态测试
B．软件测试可以随机地选取测试数据
C．软件测试是保证软件质量的重要手段
D．软件测试的目的是发现和改正错误

单项选择题

某二叉树共有150个结点，其中有50个度为1的结点，则______。

A．不存在这样的二叉树
B．该二叉树有49个叶子结点
C．该二叉树有50个叶子结点
D．该二叉树有51个叶子结点

单项选择题

数据库(DB)、数据库系统(DBS)和数据库管理系统(DBMS)之间的关系是______。

A．DB包括DBS和DBMS
B．DBMS包括DB和DBS
C．DBS包括DB和DBMS
D．DBS、DB和DBMS相互独立

单项选择题

医院里有不同的科室，每名医生分属不同科室，则实体科室与实体医生间的联系是______。

A．一对一
B．一对多
C．多对一
D．多对多

单项选择题

有三个关系R、S和T如下：

R

A B C

a 3 4

b 2 1

c 3 2

e 4 2

S

A B C

d 3 2

c 3 2

T

A B C

a 3 4

b 2 1

e 4 2

则由关系R和S得到关系T的操作是______。

A．投影
B．选择
C．交
D．差

单项选择题

计算z的值，当x大于等于y时，z=x；否则z=y。下列语句中错误的是______。

A．If x＞=y Then z=x:z=y
B．If x＞=y Then z=x Else z=y
C．z=y:If x＞=y Then z=x
D．If x＜y Then z=y Else z=x

单项选择题

在Visual Basic中，所谓“文件”指的是______。

A．内存中的全部程序和数据
B．内存中的全部指令
C．存放在外部介质上的数据的集合
D．用打印机打印出来的程序清单

单项选择题

下列合法的Visual Basic变量名是______。

A．3A
B．A+3
C．A3
D．Abs

单项选择题

函数调用：String(n,"str")的结果是______。

A．返回由n个“s”组成的字符串
B．把数值型数据n转换成字符串
C．从字符串中取出n个字符
D．从字符串中第n个字符的位置开始取子字符串

单项选择题

Open语句中以Input方式打开一个顺序文件，以便从该文件读取数据。以下叙述中正确的是______。

A．可以不必考虑文件是否存在
B．要打开的必须是一个要建立的文件
C．可以在打开时指定文件是否存在
D．要打开的必须是一个已存在的文件

单项选择题

下列关于工程的叙述中错误的是______。

A．在工程中可以设置某个窗体为启动窗体
B．一个工程可以有多个窗体模块
C．一个工程可以有多个标准模块
D．一个工程中不能没有窗体模块，但可以没有标准模块

单项选择题

下列表达式中值为False的是______。

A．"Integer"＞"Int"
B．"VisualBasic"＞"visual"
C．"XYZ"＜"XYz"
D．"123"＜"ABC"

单项选择题

设a=5，b=10，执行语句c=Int((b-a)*Rnd+a)+1后，c中数值的范围是______。

A．5～10
B．6～9
C．6～10
D．5～9

单项选择题

下列声明中正确的是______。

A．Dim a() As BooleanReDim a(8,5)
B．Dim a()ReDim a(5) As Integer
C．Dim a(3) As IntegerReDim a(5)
D．Dim a()ReDim a()

单项选择题

下列关于文件的叙述中错误的是______。

A．以Input方式打开文件时，如果文件不存在，则建立一个新文件
B．顺序文件各记录的长度可以不同
C．使用Append方式打开文件时，文件指针被定位到文件尾
D．随机文件打开后，既可以读，也可以写

单项选择题

下列说法中正确的是______。

A．如果窗体上有多个控件，程序运行时只有一个是活动控件
B．只能通过拖拉控件左下角的小方块来同时在高度和宽度上缩放控件
C．只能通过拖拉控件右上角的小方块来同时在高度和宽度上缩放控件
D．程序运行时，在窗体上非活动控件是隐藏的

单项选择题

为了使组合框能识别双击(DblClick)事件，应把它的Style属性设置为______。

A．0
B．1
C．2
D．3

单项选择题

为了使文本框Text1中的文本不能被编辑，但能滚动和选择，下列正确的设置为______。

A．Text1.Locked=True
B．Text1.Locked=False
C．Text1.Enabled=False
D．Text1.Enabled=True

单项选择题

下列叙述中错误的是______。

A．列表框和简单组合框都可以响应Change事件
B．列表框和组合框都有Text属性
C．列表框和组合框都有Style属性
D．列表框和组合框都有List属性

单项选择题

为了在形状控件中填充图案，应设置的属性是______。

A．BorderColor
B．BackStyle
C．FillStyle
D．BorderStyle

单项选择题

利用属性窗口为窗体的下面4个属性设置了值，其中错误的设置是______。

A．Name属性的值设置为Form
B．Caption属性的值设置为Form
C．ControlBox属性的值设置为False
D．Enabled属性的值设置为False

单项选择题

图片框所不具有的功能是______。

A．使其中的图片缩小，而图片内容保持完整
B．可以作为一个容器，里面放置其他控件
C．可以用Print方法在其中显示字符串
D．在程序运行过程中为其加载图片

单项选择题

下列能够接受键盘输入的控件是______。

A．列表框
B．组合框
C．标签
D．框架

单项选择题

如果要把通用对话框作为颜色对话框使用，在程序运行过程中应该进行的操作是______。

A．把通用对话框的ShowColor属性设置为True
B．调用通用对话框的ShowOpen方法
C．把通用对话框的Action属性设置为3
D．把通用对话框的Action属性设置为4

单项选择题

设窗体上有一个名称为Text1的文本框，并有下面的程序代码：
Private Sub Form_Load()
KeyPreview=True
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii+1),
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
程序运行后在文本框中输入字母“D”，则窗体上显示的是______。

A．D E
B．E D
C．D
D．E

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim S As Integer, N As Integer
S=1
Do
S=(S+1)*(S+2)
N=N+1
Loop Until S＞=30
Print N;S
End Sub
运行程序，单击命令按钮，输出结果是______。

A．2 56
B．2 3
C．5 12
D．10 20

单项选择题

阅读程序：
Private Sub Form_Click()
Dim I As Integer, J As Integer
Dim S As Integer
c=1
For I=1 To 2
For J=1 To 3
S=S+3
Next J
Next I
Print S
End Sub
运行程序，单击窗体，输出结果是______。

A．16
B．17
C．18
D．19

单项选择题

有一个数列，第一个数和第二个数分别为0和1，其后每一个数均为前两个数之和。下面是输出该数列中小于10000的最大数的程序：
Private Sub Form_Click()
a=0
b=0
Do While b＞10000
c=a+b
a=b
b=c
Loop
Print a
End Sub
运行程序，单击窗体，不能得到所需要的结果，说明程序有错误。以下正确的修改是______。

A．把b=0改为b=1，同时把b＞10000改为b＜10000
B．把b＞10000改为b=10000
C．把a=0改为a=1
D．把a=0改为a=1，同时把b=0改为b=1

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer
a=2
s=0
For i=1 To 3
s=s+Fun(a)
Next i
Print s
End Sub
Function Fun(a As Integer)
Static c
b=0
b=b+1
c=c+1
Fun=a+b+c
End Function
程序运行后，单击命令按钮，输出结果是______。

A．6
B．9
C．11
D．15

单项选择题

有如下程序：
Private Sub Form_Click()
Dim i As Integer, a(10) As Integer
Dim p(3) As Integer
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
p(i)=a(i(i+1))
Next i
For i=0 T0 2
k=k+p(i)2
Next i
Print k
End Sub
运行程序，单击窗体，输出结果是______。

A．20
B．21
C．32
D．56

单项选择题

窗体上有一个名称为Picture1的图片框和一个名称为Timer1的计时器控件，并有下面程序代码：
Dim x%,y%
Private Sub Form_Load()
x=Picture1.Width2
y=Picture1.Height2
Timer1.Enabled=True
Timer1.Interval=100
End Sub
Private Sub Timer1_Timer()
If Picture1.Width＜x Or Picture1.Height＜y Then
Picture1.Width=Picture1.Width+3
Picture1.Height=Picture1.Height+3
End If
End Sub
程序运行后产生的效果是______。

A．图片框尺寸不断变大，直到其高和宽都增加到原来的2倍为止
B．图片框尺寸不断变大，并一直增加下去
C．图片框尺寸不断变大，直到其高和宽都增加到原来的3倍为止
D．界面没有产生任何变化

单项选择题

下列程序段中没有错误的是______。

A．x=6For k=5 To 1 Step-1x=x+1NextPrint x
B．x=10While x＞5x=x-1LoopPrint x
C．x=10Do While x＞5x=x-1End DoPrint x
D．X=6Do While x＞5x=x+1Loop Until x=10Print x

单项选择题

有下列程序代码：
Private Sub Command1_Click()
Randomize
Dim x(30) As Integer, s As Integer
For k%=1 To 30
x(k)=Int(Rnd*100)
Next k
For k=1 To 30
If x(k) Mod 2=1 Then
s=s+x(k)
End If
Next k
Print s
End Sub
程序运行后的输出是______。

A．30个随机整数中所有个位数为1的数之和
B．30个随机整数中所有偶数的和
C．30个随机整数的和
D．30个随机整数中所有奇数的和

单项选择题

窗体上有Text1、Text2两个文本框，并编写了下面的程序代码：
Private Sub Form_Click()
x%=29
Text1=fun(x)
Do
x=x+1
Loop Until IsPrime(x)
Text2=x
End Sub
Private Function fun(ByVal x As Integer) As Integer
Do
x=x-1
Loop Until IsPrime(x)
fun=x
End Function
Private Function IsPrime(x As Integer) As Boolean
For k=2 To x/2
If x Mod k=0 Then
IsPrime=False
Exit Function
End If
Next k
IsPrime=True
End Function
运行程序后单击窗体，则Text1、Text2中分别显示的是______。

A．23和31
B．23和29
C．30和31
D．29和31

单项选择题

当前文件夹中设有一个文本文件File1.txt，并有下面程序代码：
Private Sub Command1_Click()
Dim ch As String
Open "File1.txt" For Input As #1
Do While Not EOF(1)
ch=Input(1,#1)
If "A"＜ch And ch＜"Z" Then
Print "&";
End If
Print ch;
Loop
Close #1
End Sub
上述代码运行时产生的结果是______。

A．在窗体上原样显示文件中的所有内容
B．把文件中所有大写字母改为“&”字符后显示，其他内容原样显示
C．把文件中的所有内容显示在窗体上，但在每个大写字母前显示一个“&”字符
D．把文件中所有大写字母改为“&”字符后显示，小写字母原样显示，其他字符不显示

设a=5，b=10，执行语句c=Int((b-a)*Rnd+a)+1后，c中数值的范围是______。

你可能感兴趣的试题

下列叙述中正确的是______。

设数据集合为D={1，2，3，4，5}，下列数据结构B=(D，R)中为非线性结构的是______。

下列排序方法中，最坏情况下时间复杂度(即比较次数)低于O(n 2 )的是______。

循环队列的存储空间为Q(1:50)，初始状态为front=rear=50。经过一系列正常的入队与退队操作后，front=rear=25，此后又正常地插入了一个元素，则循环队列中的元素个数为______。

下列选项中属于软件设计建模工具的是______。

下列描述正确的是______。

某二叉树共有150个结点，其中有50个度为1的结点，则______。

数据库(DB)、数据库系统(DBS)和数据库管理系统(DBMS)之间的关系是______。

医院里有不同的科室，每名医生分属不同科室，则实体科室与实体医生间的联系是______。

有三个关系R、S和T如下： R A B C a 3 4 b 2 1 c 3 2 e 4 2 S A B C d 3 2 c 3 2 T A B C a 3 4 b 2 1 e 4 2 则由关系R和S得到关系T的操作是______。

计算z的值，当x大于等于y时，z=x；否则z=y。下列语句中错误的是______。

在Visual Basic中，所谓“文件”指的是______。

下列合法的Visual Basic变量名是______。

函数调用：String(n,"str")的结果是______。

Open语句中以Input方式打开一个顺序文件，以便从该文件读取数据。以下叙述中正确的是______。

下列关于工程的叙述中错误的是______。

下列表达式中值为False的是______。

设a=5，b=10，执行语句c=Int((b-a)*Rnd+a)+1后，c中数值的范围是______。

下列声明中正确的是______。

下列关于文件的叙述中错误的是______。

下列说法中正确的是______。

为了使组合框能识别双击(DblClick)事件，应把它的Style属性设置为______。

为了使文本框Text1中的文本不能被编辑，但能滚动和选择，下列正确的设置为______。

下列叙述中错误的是______。

为了在形状控件中填充图案，应设置的属性是______。

利用属性窗口为窗体的下面4个属性设置了值，其中错误的设置是______。

图片框所不具有的功能是______。

下列能够接受键盘输入的控件是______。

如果要把通用对话框作为颜色对话框使用，在程序运行过程中应该进行的操作是______。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim S As Integer, N As Integer S=1 Do S=(S+1)*(S+2) N=N+1 Loop Until S＞=30 Print N;S End Sub 运行程序，单击命令按钮，输出结果是______。

阅读程序： Private Sub Form_Click() Dim I As Integer, J As Integer Dim S As Integer c=1 For I=1 To 2 For J=1 To 3 S=S+3 Next J Next I Print S End Sub 运行程序，单击窗体，输出结果是______。

有如下程序： Private Sub Form_Click() Dim i As Integer, a(10) As Integer Dim p(3) As Integer k=5 For i=0 To 10 a(i)=i Next i For i=0 To 2 p(i)=a(i*(i+1)) Next i For i=0 T0 2 k=k+p(i)*2 Next i Print k End Sub 运行程序，单击窗体，输出结果是______。

下列程序段中没有错误的是______。

有下列程序代码： Private Sub Command1_Click() Randomize Dim x(30) As Integer, s As Integer For k%=1 To 30 x(k)=Int(Rnd*100) Next k For k=1 To 30 If x(k) Mod 2=1 Then s=s+x(k) End If Next k Print s End Sub 程序运行后的输出是______。

下列排序方法中，最坏情况下时间复杂度(即比较次数)低于O(n ² )的是______。

有三个关系R、S和T如下：

R

A B C

a 3 4

b 2 1

c 3 2

e 4 2

S

A B C

d 3 2

c 3 2

T

A B C

a 3 4

b 2 1

e 4 2

则由关系R和S得到关系T的操作是______。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim S As Integer, N As Integer
S=1
Do
S=(S+1)*(S+2)
N=N+1
Loop Until S＞=30
Print N;S
End Sub
运行程序，单击命令按钮，输出结果是______。

阅读程序：
Private Sub Form_Click()
Dim I As Integer, J As Integer
Dim S As Integer
c=1
For I=1 To 2
For J=1 To 3
S=S+3
Next J
Next I
Print S
End Sub
运行程序，单击窗体，输出结果是______。

有如下程序：
Private Sub Form_Click()
Dim i As Integer, a(10) As Integer
Dim p(3) As Integer
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
p(i)=a(i(i+1))
Next i
For i=0 T0 2
k=k+p(i)2
Next i
Print k
End Sub
运行程序，单击窗体，输出结果是______。

有下列程序代码：
Private Sub Command1_Click()
Randomize
Dim x(30) As Integer, s As Integer
For k%=1 To 30
x(k)=Int(Rnd*100)
Next k
For k=1 To 30
If x(k) Mod 2=1 Then
s=s+x(k)
End If
Next k
Print s
End Sub
程序运行后的输出是______。