为了取消窗体的最小化功能，需要把它的一个属性设置为False，这个属性是__...

单项选择题

在窗体中有一个名为Command1的命令按钮，并编写有以下代码。程序执行时，单击命令按钮，输出的结果为( )。
Public Sub Procl(n As Integer,ByVal m As Integer)
n=n Mod 10:m=m/10
End Sub
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=12:y=34
Call Procl(x,y)
Print x;y
End Sub

A) 2 3 B) 2 34 C) 12 3 D) 12 34

单项选择题

下列程序段，在运行时，最早输出的内容是 a=2 C=1 AAA： C=C+a If c＜10 Then Print c CoTo AAA E1se Print"10以内的奇数显示完毕。 End If

A．3
B．7
C．9
D．6

单项选择题

设a=6，则执行
x=IIF(a＞5，-1,0)
后，x的值为 ______。

A) 5
B) 6
C) 0
D) -1

单项选择题

对窗体编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer，Shift As Integer,X As Single，
Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print "BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______ 。

A) AAAAA
BBBBB
B) BBBBB
C) AAAAA
D) BBBBBAAAAA

单项选择题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：
Private Sub Form_Load()
Show
Text1.Text=" "
Text2.Text="’’
Text1.SetFocus
End Sub
Private Sub Text1_Change()
Text2.Text=Mid(Text1.Text,8)
End Sub
程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是

A) BeijingChina
B) China
C) Beijing
D) BeijingC

单项选择题

语句Dim Arr(3 To 5,-2 To 2)定义的数组的元素个数是( )。

A) 20
B) 12
C) 15
D) 24

单项选择题

在深度为5的满二叉树中，结点的个数为

A) 32 B) 31 C) 16 D) 15

单项选择题

定义有5个整数型元素的数组，正确的语句是______。
A) Dim a(4)As Integer B) Option Base 1：Dim a(5)
C) Dim a&(5) D) Dime a(5)As Integer

单项选择题

在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为“Save”，缺省文件名称为“SaveFile”，在“文件类型”栏中显示txt，则能够满足上述要求的程序是
A) Private Sub Command1_Click ( )　　CommonDialog1．FileName="SaveFile"　　CommonDialog1．Filter="AllFiles|.*|(.txt)|.txt|(.doC) |.doc"　　CommonDialog1．FilterIndex=2　　CommonDialog1．DialogTitle="Save"　　CommonDialog1．Action=2　　End SubB) Private Sub Command1_Click ( )　　CommonDialog1．FileName="SaveFile"　　CommonDialog1．Filter="AllFiles|.|(.txt)|.txt|(.doC) |.doc"　　CommonDialog1．FilterIndex=1　　CommonDialog1．DialogTitle="Save"　　CommonDialog1．Action=2　　End SubC) Private Sub Command1 Click ( )　　CommonDialog1．FileName="Save"　　CommonDialog1．Filter="AllFiles|.|(.txt)|.txt|(.doC) |.doc"　　CommonDialog1．FilterIndex=2　　CommonDialog1．DialogTitle="SaveFile"　　CommonDialog1．Action=2　　End SubD) Private Sub Command1 Click ( )　　CommonDialog1．FileName="SaveFile"　　CommonDialog1．Filter="AllFiles|.|(.txt)|.txt|(.doC) |.doc"　　CommonDialogl.FilterIndex=1　　CommonDialog1.DialogTitle="Save"　　CommonDialog1．Action=1　　End Sub

单项选择题

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为______。
Prinvate Sub Command1_Click()
For i=1 To 4
x=4
Forj=1 To 3
x=3
For k=1 To 2
x=x+5
Next
Next
Next
Ptint x
End Sub

A) 13
B) 26
C) 30
D) 40

单项选择题

下列叙述中不正确的是( )。

A) 若使用Write#语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号
B) 若使用Print#语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号
C) Write#语句和Print#语句建立的顺序文件格式完全一样
D) Write#语句和Print#语句均实现向文件写入数据

单项选择题

如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是______。

A)任何时刻最多只有一个窗体是活动窗体
B)不能把标准模块设置成启动模块
C)用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体
D)如果工程中含有Sub Main过程，则程序一定首先执行该过程

单项选择题

下列程序段的执行结果为　　I=4　　x=5　　Do　　　　I=I + 1　　　　X=K^2　　Loop Until I＞=7　　Print"I="；I　　Print"x="；xA)I=4
x=258694
B)I=7 x=256987
C)I=6 x=365840
D)I=7 x=390625

单项选择题

以下程序段中Do...Loop循环执行的次数为______。
n=5
Do
if n mod 2=0 then
n=n\2
else
n=n*3+1
end if
Loop until n=1

A) 4
B) 3
C) 5
D) 2

单项选择题

当ScrollBars属性的值为 ______ 时，给文本框同时加水平滚动条和垂直滚动条。

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

单项选择题

如果在立即窗口中执行以下操作(＜CR＞是回车键)：
a=8 ＜CR＞
b=9 ＜CR＞
print a＞b＜CR＞
则输出结果是 ______。

A) -1
B) 0
C) False
D) True

单项选择题

若要获得滚动条的当前值，可访问的属性是______。

A) Text
B) Value
C) Max
D) Min

单项选择题

软件工程上常用的表达工具有______。

A) 图形工具
B) 表格工具
C) 语言工具
D) 以上全是

单项选择题

如果进栈序列为e1，e2，e3，e4，则可能的出栈序列是
A)e3，e1，e4，e2
B)e2，e4，e3，el
C)e3，e4，e1，e2
D)任意顺序

单项选择题

下列数据模型中，具有坚实理论基础的是( )。

A) 层次模型
B) 网状模型
C) 关系模型
D) 以上三个都是

单项选择题

在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是( )。

A) 并
B) 交
C) 投影
D) 除

单项选择题

假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：
Private Type animal
animalName As String20
aColor As String10
End Type
在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim rec As animal
Open "c:\vbTest. dat" For Random As #1 Len=Len(rec)
rec. animalName="Cat"
rec. aColor="White"
Put #1, , rec
End Sub
则以下叙述中正确的是______。

A) 记录类型animal不能在Form1中定义，必须在标准模块中定义
B) 如果文件"c:\vbTest. dat"不存在，则Open命令执行失败
C) 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D) 语句“Put #1, , rec”将animal类型的两个数据元素写到文件中

单项选择题

假定程序中有以下语句：
answer=MsgBox("String1",,"String2","String3",2)
执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为______。

A) String1
B) String2
C) String3
D) 1

单项选择题

假定窗体上有一个文本框，名为txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为

A．Txt1.MultiLine=True Txt1.ScrollBars=0
B．Txt1.MuhiLine=True Txt1.ScrollBars=2
C．Txt1.MuhiLine=False Txt1.ScrollBars=0
D．Txt1.MuhiLine=False Txt1.ScrollBars=3

单项选择题

若对n个元素进行直接插入排序，则进行第i趟排序过程前，有序表中的元素个数为 ______。

A．1
B．i-1
C．i
D．i+1

单项选择题

要想改变窗体边框线型，可使用的属性是______。

A) FontStyle
B) BorderStyle
C) BackStyle
D) Border

单项选择题

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

A)一个逻辑数据结构只能有一种存储结构
B)逻辑结构属于线性结构，存储结构属于非线性结构
C)一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率
D)一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率

单项选择题

能够确定控件或窗体大小的属性是______。

A) Top和Lef B) Top或Left C) Height或Width D) Height和Width

单项选择题

设有如下程序：
Private Sub Command1_Click()
Dim C As Integer, d As Integer
c=4
d=InputBox("请输入一个整数")
Do While d＞0
If d＞c Then
c=c+1
End If
d=InputBox("请输入一个整数")
Loop
Print c+d
End Sub
程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是______。

A) 12
B) 11
C) 10
D) 9

单项选择题

若在Shape控件内以FillSyylr属性所指定的图案填充区域，而填充图案的线条的颜色由FillColor属性指定，非线条的区域由Back Style属性填充，则应______。

A) 将Shape控件的Fillstyle属性设置为2～7间的某个值，BackStyle属性设置为1
B) 将Shape控件的FillStyle属性设置为0或1，Backstyle属性设置为1
C) 将Shape控件的FillStyle属性设置为2～7间的某个值，BackStyle属性设置为0
D) 将Shape控件的FillStyle属性设置为0或1，BackStyle属性设置为0

为了取消窗体的最小化功能，需要把它的一个属性设置为False，这个属性是______。

你可能感兴趣的试题

要使文本框获得输入焦点，则应采用文本框控件的( )方法。

下列对于软件测试的描述正确的是( )

为了取消窗体的最小化功能，需要把它的一个属性设置为False，这个属性是______。

n个顶点的强连通图的边数至少有 ______。

使用Redim Preserve可以改变数组的 A) 最后一维的大小 B) 第一维的大小 C) 所有维的大小 D) 改变维数和所有维的大小

下列程序段，在运行时，最早输出的内容是 a=2 C=1 AAA： C=C+a If c＜10 Then Print c CoTo AAA E1se Print"10以内的奇数显示完毕。 End If

设a=6，则执行 x=IIF(a＞5，-1,0) 后，x的值为 ______。

语句Dim Arr(3 To 5,-2 To 2)定义的数组的元素个数是( )。

在深度为5的满二叉树中，结点的个数为

定义有5个整数型元素的数组，正确的语句是______。 A) Dim a(4)As Integer B) Option Base 1：Dim a(5) C) Dim a&(5) D) Dime a(5)As Integer

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为______。 Prinvate Sub Command1_Click() For i=1 To 4 x=4 Forj=1 To 3 x=3 For k=1 To 2 x=x+5 Next Next Next Ptint x End Sub

下列叙述中不正确的是( )。

如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是______。

下列程序段的执行结果为 I=4 x=5 Do I=I + 1 X=K^2 Loop Until I＞=7 Print"I="；I Print"x="；xA)I=4 x=258694 B)I=7 x=256987C)I=6 x=365840D)I=7 x=390625

以下程序段中Do...Loop循环执行的次数为______。 n=5 Do if n mod 2=0 then n=n\2 else n=n*3+1 end if Loop until n=1

当ScrollBars属性的值为 ______ 时，给文本框同时加水平滚动条和垂直滚动条。

如果在立即窗口中执行以下操作(＜CR＞是回车键)： a=8 ＜CR＞ b=9 ＜CR＞ print a＞b＜CR＞ 则输出结果是 ______。

若要获得滚动条的当前值，可访问的属性是______。

软件工程上常用的表达工具有______。

如果进栈序列为e1，e2，e3，e4，则可能的出栈序列是 A)e3，e1，e4，e2 B)e2，e4，e3，el C)e3，e4，e1，e2 D)任意顺序

下列数据模型中，具有坚实理论基础的是( )。

在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是( )。

假定程序中有以下语句： answer=MsgBox("String1",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为______。

假定窗体上有一个文本框，名为txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为

若对n个元素进行直接插入排序，则进行第i趟排序过程前，有序表中的元素个数为 ______。

要想改变窗体边框线型，可使用的属性是______。

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

能够确定控件或窗体大小的属性是______。

若在Shape控件内以FillSyylr属性所指定的图案填充区域，而填充图案的线条的颜色由FillColor属性指定，非线条的区域由Back Style属性填充，则应______。

使用Redim Preserve可以改变数组的
A) 最后一维的大小 B) 第一维的大小
C) 所有维的大小 D) 改变维数和所有维的大小

设a=6，则执行
x=IIF(a＞5，-1,0)
后，x的值为 ______。

定义有5个整数型元素的数组，正确的语句是______。
A) Dim a(4)As Integer B) Option Base 1：Dim a(5)
C) Dim a&(5) D) Dime a(5)As Integer

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为______。
Prinvate Sub Command1_Click()
For i=1 To 4
x=4
Forj=1 To 3
x=3
For k=1 To 2
x=x+5
Next
Next
Next
Ptint x
End Sub

下列程序段的执行结果为　　I=4　　x=5　　Do　　　　I=I + 1　　　　X=K^2　　Loop Until I＞=7　　Print"I="；I　　Print"x="；xA)I=4
x=258694
B)I=7 x=256987
C)I=6 x=365840
D)I=7 x=390625

以下程序段中Do...Loop循环执行的次数为______。
n=5
Do
if n mod 2=0 then
n=n\2
else
n=n*3+1
end if
Loop until n=1

如果在立即窗口中执行以下操作(＜CR＞是回车键)：
a=8 ＜CR＞
b=9 ＜CR＞
print a＞b＜CR＞
则输出结果是 ______。

如果进栈序列为e1，e2，e3，e4，则可能的出栈序列是
A)e3，e1，e4，e2
B)e2，e4，e3，el
C)e3，e4，e1，e2
D)任意顺序

假定程序中有以下语句：
answer=MsgBox("String1",,"String2","String3",2)
执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为______。