试卷详情
-
二级VISUAL BASIC笔试-309
-
[单项选择]下面程序运行后,输出结果是( )。
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( )
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. 天天向上清华大学天上人间程序设计
-
[单项选择]要使一个图片框控件能自动地附着在窗体的一条边上,应设置它的( )属性。
A. Picture
B. Aligmen
C. Border
D. Align
-
[单项选择]执行如下两条语句后,窗体上显示的是( )。
a=9.8596
PrintFormat(a,"$0,000.00")
A. 0,009.86
B. $9.86
C. 9.86
D. $0,009.86
-
[单项选择]通过文本框的( )事件过程可以获取文本框中输入字符的ASCII码值。
A. Change
B. GotFocus
C. LostFocus
D. KeyPress
-
[单项选择]Label控件中内容能垂直方向变化而宽度保持不变则应设置( )属性。
A. Wordwrap
B. Enabled
C. Locked
D. AutoSize
-
[填空题]Visual Basic中允许出现的数为______。
±25.74 3.47E-10 .368 1.87E+50
10^(1.256) D32 2.5E 12E3
34.75D+6 0.258
-
[单项选择]在窗体上画一个通用对话框,其名称为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. 不确定
-
[单项选择]Mid("HelloEveryone",7,3)的执行结果是( )。
A. ong
B. every
C. Eve
D. one
-
[单项选择]如果要在任何新建的模块中自动插入Option Explicit语句,则应采用下列( )操作步骤。
A. “工具”菜单中选取“选项”命令,打开“选项”对话框,单击“编辑器”选项卡,选中“要求变量声明”选项
B. 在“编辑”菜单中执行“插入文件”命令
C. 在“工程”菜单中执行“添加文件”命令
D. 以上操作均不对
-
[单项选择]对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为( )。
A. log2n
B. n/2
C. n
D. n+1
-
[单项选择]假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为( )。
A. Menultem.Enabled=False
B. Menultem.Enabled=True
C. Menultem.Visible=Tme
D. Menultem.Visible=Hase
-
[单项选择]单击命令按钮时,下列程序代码的执行结果为( )。
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
-
[单项选择]执行语句s=Len(Mid("VisualBasic",1,6))后,s的值是( )。
A. Visual.
B. Basic
C. 6
D. 11
-
[填空题]数学公式(x+y)4的VB算述表达式是______。
-
[单项选择]如果想在程序中反复使用一个日期型数据“01/01/2005”,为了避免在编写程序时反复输入这个数据,也为了一次能够修改程序中所有用到这个数据的语句,可以采用( )。
A. 将这个数据声明为字符串型常量,用一个常量标识符代表它
B. 将这个数据声明为字符串型变量,用一个变量标识符表示它
C. 将这个数据声明为日期型常量,用一个常量标识符代表它
D. 将这个数据声明为日期型变量,用一个变量标识符表示它
-
[单项选择]下列叙述中正确的是( )。
A. 一个逻辑数据结构只能有一种存储结构
B. 数据的逻辑结构属于线性结构,存储结构属于非线性结构
C. 一个逻辑数据结构可以有多种存储结构,且各种存储结构不影响数据处理的效率
D. 一个逻辑数据结构可以有多种存储结构,且各种存储结构影响数据处理的效率
-
[单项选择]程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是( )。
A. MouseDown
B. MouseUp
C. Load
D. Chck
-
[单项选择]下列说法正确的是( )。
A. 一个应用程序中只能创建一个窗体
B. 一个应用程序中只能创建一个模块
C. 一个应用程序中只能创建一个MDI窗体
D. 一个应用程序中只能创建一个MDI子窗体
-
[填空题]已知B的ASCⅡ码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数。
Dim [10]
Fori=65 To 90
pp(i)=0
Next
x$=InputBox("Enter a string",K$)
x$=U Case$(x$)
Fori=1 To Len(x$)
n=Asc(Mid$(x$,i,1))
If n>=65Andn<=90Then
[11]
End If
Nexti
Fori=65 To 90
If pp(i)>Then
Print Chr$(i);pp(i)
End If
Next
-
[填空题]设有如下程序:
Private Sub Form_Cliok( )
Dima As Integer,S As Integer
n=8
s=0
Do
s=s+n
n=n-1
Loop While n>0
Print s
End Sub
以上程序的功能是 [7] ;程序运行后,单击窗体,输出结果为 [8] 。
-
[单项选择]当对命令按钮的Picture属性装入.bmp图形文件后,命令按钮上并没有显示所需的图形,原因是没有对某个属性设置为1,该属性是( )。
A. MousePicture
B. Style
C. DownPicture
D. DisabledPicture
-
[单项选择]以下关于焦点的叙述中,错误的是( )。
A. 如果文本框的TabStop属性为False,则不能接收从键盘上输入的数据
B. 当文本框失去焦点时,触发LostFocus事件
C. 当文本框的Enabled属性为False时,其Tab顺序不起作用
D. 可以用Tab Index属性改变Tab顺序
-
[单项选择]每建立一个窗体,工程管理器窗口中就会增加一个( )。
A. 工程文件
B. 窗体文件
C. 程序模块文件
D. 类模块文件
-
[单项选择]运行以下程序后,输出的图形是( )。
Forr=O To 150
Circle(320,240),r
Fori=1 To 1000
Nexti
Nextr
A. 一个固定的空心圆
B. 一个半径逐渐变大的空心圆
C. 一个固定的实心圆
D. 一个半径逐渐变大的实心圆
-
[单项选择]下列语句中正确的是( )。
A. IfX<3*YAndX>YThenY=X^3
B. IfX<3*YAndX>YThenY=X3
C. IfX<3*Y:X>YThenY=X^3
D. IfX<3*YAndX>YThenY=X**3
-
[单项选择]在VisualBasic中,要使标签的标题居中显示,则将其Alignment属性设置为( )。
A. 0
B. 2
C. 1
D. 3
-
[填空题]下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
Sub PR( )
Randomize
Dima(10)
Forj=1 To 10
a(i)=Int______
If a(j)Mod5=0 Then k=k+1
Printa(j)
Nextj
Print
Printk/10
End Sub
-
[单项选择]下面叙述中正确的是( )。
A. SW函数只能用于Print方法中
B. Space函数既可以用于Print方法中,也能用于表达式
C. Spc函数与Space函数均生成空格,没有区别
D. 以上说法均不对
-
[单项选择]目录列表框的Path属性的作用是( )。
A. 显示当前驱动器或指定驱动器上的某目录下的文件名
B. 显示当前驱动器或指定驱动器上的目录结构
C. 显示根目录下的文件名
D. 显示指定路径下的文件
-
[填空题]代码窗口分为左右两栏,左边一栏称为______,右边一栏称为过程框。
-
[单项选择]在数据管理技术的发展过程中,经历了人工管理阶段,文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是( )。
A. 数据库系统
B. 文件系统
C. 人工管理
D. 数据项管理
-
[单项选择]在窗体上画一个名称为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
-
[填空题]欲打开各种Visual Basic窗口或显示工具栏,其对应的菜单命令均放置于主菜单项______。的下拉菜单中。
-
[填空题]在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Private Sub Commandl_Click( )
Dima(5)
Fori=0 To 4
A(i)=i+1
t=i+1
If t=3 Then
Print a(i)
A(t-1)=a(i-2)
Else
A(t)=a(i)
End If
Ifi=3 Thena(i+1)=a(t-4)
A(4)=1
Printa(i)
NextI
End Sub
程序运行后,单击命令按钮,输出结果是上______。
-
[单项选择]下列关于闲置循环的四个叙述中,错误的是( )。
A. 闲置循环是当应用程序处于闲置状态下执行的循环
B. 闲置循环可以占用所有的CPU时间
C. 闲置循环是无法退出的
D. 闲置循环使系统不响应其他任何事件,除非使用DoEvents语句
-
[填空题]设有如下程序段:
a$="BeujingShanghai"
b$=Mid(a$,Instr(a$,"g")+1)。
执行上面的程序段后,变量b$的值为______。
-
[填空题]在3种不同类型的组合框中,只能选择而不能输入数据的组合框是______。
-
[单项选择]任何控件都具有( )属性。
A. Text
B. Caption
C. Name
D. ForeCol0r
-
[单项选择]在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是( )。
A. Private Sub Texl_Change()
B. PrivateSubCommandl_Click()
C. Private Sub Commandl_Click()
D. Private Sub Commandl_Click()
-
[单项选择]执行以下程序段后,变量c$的值为( )。
S$="VisualBasicProgramming"
b$="Quick"
c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
A. VisualBASICProgramming
B. QuickBasicProgramming
C. QUICKBasicProgramming
D. QuickBASICProgramming
-
[单项选择]下面程序运行后的结果是( )。
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
-
[单项选择]设有如下语句:
Dim a,b As Integer
c="VisualBasic"
d=#7/20/2005#
以下关于这段代码的叙述中,错误的是( )。
A. a被定义为Integer类型变量
B. b被定义为Integer类型变量
C. c中的数据是字符串
D. d中的数据是日期类型
-
[单项选择]为了清除窗体上的一个控件,下列正确的操作是( )。
A. 按回车键
B. 按Esc键
C. 选择(单击)要清除的控件,然后按Del键
D. 选择(单击)要清除的控件,然后按回车键
-
[填空题]把“Visual Basic程序设计”添加到列表框lstBooks的语句为______。