以下关于焦点的叙述中，错误的是( )。

每建立一个窗体，工程管理器窗口中就会增加一个( )。

在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是( )。

A．Private Sub Texl_Change()
Commandl.Caption="计算机等级考试”
End Sub
B．PrivateSubCommandl_Click()
Caption="计算机等级考试"
C．Private Sub Commandl_Click()
Text.Caption="计算机等级考试"
End Sub
D．Private Sub Commandl_Click()
Text1.Text="计算机等级考试"
End Sub

单项选择题

在VisualBasic中，要使标签的标题居中显示，则将其Alignment属性设置为( )。

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

单项选择题

下列程序运行时输出的结果是( )。
Private Sub Form_Click()
Dima
a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计")
forI=Lbound(a，1) to Ubound(a，1)
ifleft(a(i)，1)="天"then print a(i)；
nextI
End Sub

A．天天向上
B．天天向上天上人间
C．出错信息
D．天天向上清华大学天上人间程序设计

单项选择题

执行以下程序段后，变量c$的值为( )。
S$="VisualBasicProgramming"
b$="Quick"
c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，12)

A．VisualBASICProgramming
B．QuickBasicProgramming
C．QUICKBasicProgramming
D．QuickBASICProgramming

单项选择题

如果想在程序中反复使用一个日期型数据“01/01/2005”，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到这个数据的语句，可以采用( )。

A．将这个数据声明为字符串型常量，用一个常量标识符代表它
B．将这个数据声明为字符串型变量，用一个变量标识符表示它
C．将这个数据声明为日期型常量，用一个常量标识符代表它
D．将这个数据声明为日期型变量，用一个变量标识符表示它

单项选择题

以下定义数组或给数组元素赋值的语句中，正确的是( )。

单项选择题

下面程序运行后，输出结果是( )。
Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2)
ForI=1 to 4
b(I)=n*I
NextI
End Sub
Private Sub Commandl_Click()
Dima(1 to 4)As Integer，I As Integer
Callmysub(a()，5)
Mysuba()
ForI=1 to 4
Print a(i)；
Next
End Sub

A．5101520
B．2468
C．出错
D．0000

单项选择题

下面程序运行后的结果是( )。
Private Sub Form_Click()
Dim s As Integer，k As Integer,i As Integer，n As Integer
s=1
fori=1 to 3
forj=i to 3
for k=j to istep-1
s=s*k
nextk,J,i
print s
End Sub

A．6
B．72
C．144
D．432

单项选择题

单击命令按钮时，下列程序代码的执行结果为( )。
Private Sub Procl(nAs Integer,ByValmASInteger)
n=nMod 10
m=m\10
End Sub
PrivateSubCommandl_Click()
Dimx As Integer
Dimy As Integer
x=12
y=34
CallProcl(x，y)
Printx；y
End Sub

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

单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dimarrayl(10,10)As Integer
Dimi As Integer,j As Integer
Fori=1 To 3
Forj=2 To 4
arrayl(i,j)=i+j
Nextj
Nexti
Text1.Text=array1(2，3)+array1(3，4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是( )。

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

单项选择题

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程：
Private Sub Commandl_click()
CommonDialogl.Friter="AllFiles(.)|.|Text Files"&_
"(.txt)|.txt|Executable Files(.exe)|.exe"
CommonDialog1.FilterIndex=3
CommonDialog1.Show Open
MsgBOX CommonDialog1.FileName
End Sub
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是( )。

A．AllFries(*.*)
B．TextFiles(*.txt)
C．Executable Fries(*.exe)
D．不确定

以下关于焦点的叙述中，错误的是( )。

你可能感兴趣的试题

每建立一个窗体，工程管理器窗口中就会增加一个( )。

在VisualBasic中，要使标签的标题居中显示，则将其Alignment属性设置为( )。

下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计") forI=Lbound(a，1) to Ubound(a，1) ifleft(a(i)，1)="天"then print a(i)； nextI End Sub

通过文本框的( )事件过程可以获取文本框中输入字符的ASCII码值。

下列关于闲置循环的四个叙述中，错误的是( )。

以下关于焦点的叙述中，错误的是( )。

运行以下程序后，输出的图形是( )。 Forr=O To 150 Circle(320,240)，r Fori=1 To 1000 Nexti Nextr

对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为( )。

要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的( )属性。

Label控件中内容能垂直方向变化而宽度保持不变则应设置( )属性。

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

执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是( )。

下列语句中正确的是( )。

目录列表框的Path属性的作用是( )。

执行如下两条语句后，窗体上显示的是( )。 a=9.8596 PrintFormat(a，"$0,000.00")

假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效(变灰)，应使用的语句为( )。

程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是( )。

当对命令按钮的Picture属性装入.bmp图形文件后，命令按钮上并没有显示所需的图形，原因是没有对某个属性设置为1，该属性是( )。

设有如下语句： Dim a，b As Integer c="VisualBasic" d=#7/20/2005# 以下关于这段代码的叙述中，错误的是( )。

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

为了清除窗体上的一个控件，下列正确的操作是( )。

下列说法正确的是( )。

Mid("HelloEveryone"，7,3)的执行结果是( )。

如果要在任何新建的模块中自动插入Option Explicit语句，则应采用下列( )操作步骤。

任何控件都具有( )属性。

在数据管理技术的发展过程中，经历了人工管理阶段，文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是( )。

执行以下程序段后，变量c$的值为( )。 S$="VisualBasicProgramming" b$="Quick" c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，12)

如果想在程序中反复使用一个日期型数据“01/01/2005”，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到这个数据的语句，可以采用( )。

以下定义数组或给数组元素赋值的语句中，正确的是( )。

下面程序运行后，输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer，I As Integer Callmysub(a()，5) Mysuba() ForI=1 to 4 Print a(i)； Next End Sub

下面程序运行后的结果是( )。 Private Sub Form_Click() Dim s As Integer，k As Integer,i As Integer，n As Integer s=1 fori=1 to 3 forj=i to 3 for k=j to istep-1 s=s*k nextk,J,i print s End Sub

单击命令按钮时，下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m\10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x，y) Printx；y End Sub

下列程序运行时输出的结果是( )。
Private Sub Form_Click()
Dima
a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计")
forI=Lbound(a，1) to Ubound(a，1)
ifleft(a(i)，1)="天"then print a(i)；
nextI
End Sub

运行以下程序后，输出的图形是( )。
Forr=O To 150
Circle(320,240)，r
Fori=1 To 1000
Nexti
Nextr

执行如下两条语句后，窗体上显示的是( )。
a=9.8596
PrintFormat(a，"$0,000.00")

设有如下语句：
Dim a，b As Integer
c="VisualBasic"
d=#7/20/2005#
以下关于这段代码的叙述中，错误的是( )。

执行以下程序段后，变量c$的值为( )。
S$="VisualBasicProgramming"
b$="Quick"
c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，12)

下面程序运行后，输出结果是( )。
Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2)
ForI=1 to 4
b(I)=n*I
NextI
End Sub
Private Sub Commandl_Click()
Dima(1 to 4)As Integer，I As Integer
Callmysub(a()，5)
Mysuba()
ForI=1 to 4
Print a(i)；
Next
End Sub

下面程序运行后的结果是( )。
Private Sub Form_Click()
Dim s As Integer，k As Integer,i As Integer，n As Integer
s=1
fori=1 to 3
forj=i to 3
for k=j to istep-1
s=s*k
nextk,J,i
print s
End Sub

单击命令按钮时，下列程序代码的执行结果为( )。
Private Sub Procl(nAs Integer,ByValmASInteger)
n=nMod 10
m=m\10
End Sub
PrivateSubCommandl_Click()
Dimx As Integer
Dimy As Integer
x=12
y=34
CallProcl(x，y)
Printx；y
End Sub