试卷详情
-
二级VISUAL BASIC笔试-277
-
[单项选择]下列程序段的执行结果为
For X=5 To 1 Step -1
For Y=1 To 6-x
Print Tab(Y+5);" * ";
Next
Print
Next
A. *****
B. *****
C. *
D. *
-
[单项选择]数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是
A. 控制流
B. 加工
C. 数据存储
D. 源和潭
-
[单项选择]设执行以下程序段时依次输入2,4,6执行结果为
Dim a(4) As Integer,b(4) As Integer
For k =0 To 2
a(k + 1) = Val(InputBox( "Enter data:" ) )
b(3 - k) =a(k + 1)
Next
Print b(k)
A. 2
B. 4
C. 6
D. 0
-
[填空题]顺序存储方法是把逻辑上相邻的结点存储在物理位置 【2】 的存储单元中。
-
[填空题]下列程序的功能是:将数据1,2…,10写入顺序文件Base.txt中,请填空。
Private Sub Form_Click( )
Dim i As Integer
Open "Base. txt" For Output As #1
For i=1 To 10
【15】
Next
Close #1
End Sub
-
[单项选择]在数据库设计中,将E-R图转换成关系数据模型的过程属于
A. 需求分析阶段
B. 逻辑设计阶段
C. 概念设计阶段
D. 物理设计阶段
-
[单项选择]从键盘上输入一个实数nu,利用字符串函数对该数进行处理,如果输出的内容不是字符End,则程序输出的内容是
nu = InputBox("nu = ")
n$ = Str$ (nu)
p=InStr(n$,".")
if p>0 Then
Print Mid$(n$.p)
Else
Print "END"
End If
A. 用字符方式输出数据nu
B. 输出数据的整数部分
C. 输出数据的小数部分
D. 只去掉数据中的小数点,保留所有数字输出
-
[单项选择]用InputBox函数设计的对话框,其功能是
A. 只能接收用户输入的数据,但不会返回任何信息
B. 能接收用户输入的数据,并能返回用户输入的信息
C. 既能用于接收用户输入的信息,又能用于输出信息
D. 专门用于输出信息
-
[填空题]关系式x≤-5或x≥5所对应的布尔表达式是 【6】 。
-
[单项选择]设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
A. 命令按钮的所有Caption属性都是Command1
B. 在代码中访问任意一个命令按钮只需使用名称Command1
C. 命令按钮的大小都相同
D. 命令按钮共享相同的事件过程
-
[单项选择]以下语句用于打开一个顺序文件Open"C:/MyFile.txt"For OutPut,但是该语句的一个重要错误是没有
A. 指定打开方式
B. 指定文件号
C. 指定打开文件名
D. 指定文件类型
-
[单项选择]Mid("Hello Everyone",7,3)的执行结果是
A. yon
B. every
C. Eve
D. one
-
[单项选择]在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
A. "text(.txt)
B. "文本文件(.txt)
C. "text(.txt)FFFFF
D. "text(.txt)(*.text)"
-
[填空题]有如下函数过程:
Function gys(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y<>0
preminder=x/y
x=Y
y=preminder
Loop
gys=x
End Function
以下是调用该函数的事件过程,该程序的运行结果是 【9】 。
Private Sub Command1_Click( )
Dim a As Integer,b As Integer
a=10:b=2
x=gys(a,b)
Print x
End Sub
-
[填空题]数据的逻辑结构有线性结构和 【1】 两大类。
-
[填空题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,
Form1窗体消失,显示Form2窗体,程序如下,请填空。
Private Sub Command1_Click( )
Form1.Hide
Form2. 【8】
End Sub
-
[单项选择]下面程序段,运行后的结果是
Private Sub Command1_Click( )
Dim b%(1 To 4) ,i%, t#
For i = 1 To 4
b(i) =i
Next
t =Tof(b( ) )
Print "t ="; t,
End Sub
Function Tof(a( ) As Integer)
Dim t#, i%
t=1
For i =2 To UBound(
-
[单项选择]结构化程序设计主要强调的是
A. 程序的规模
B. 程序的效率
C. 程序设计语言的先进性
D. 程序易读性
-
[填空题]有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。
Private Sub Form_Click( )
Dim x As Single,y As Single
Open "NM1.txt" For Input As #1
Open "NM2.txt "For Input As #2
Do While Not EOF(1)
【10】
Print x
y=x^2
【11】
Print y
Loop
Close #1, S2
End Sub
-
[单项选择]下列语句中,不能实现循环100次的是
A. Do
B. Do
C. Do
D. Do While n<100
-
[填空题]关系操作的特点是 【5】 操作。
-
[单项选择]下列程序运行后的输出结果是
Private Sub Command1_Click( )
For k=3 To 1 Step-1
x=String(k,"*")
Print x
Next
End Sub
-
[填空题]把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:
Private Sub Form_KeyDown( KeyCode As Integer, Shift As Integer)
Print KeyCode;
End Sub
Private Sub Form_KeyPress( KeyAscii As Integer)
Print Key Ascii
End Sub
程序运行后,如果按下a键,则在窗上输出的数值为 【14】 。
-
[单项选择]数据结构中,与所使用的计算机无关的是数据的
A. 存储结构
B. 物理结构
C. 逻辑结构
D. 物理和存储结构
-
[单项选择]软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
A. 模块间的关系
B. 系统结构部件转换成软件的过程描述
C. 软件层次结构
D. 软件开发过程
-
[填空题]下列程序段的执行结果为 【13】 。
Dim A (10,10)
For i = 2 To 4
For j =4 To 5
A(i,j) =i*j
Next
Next
Print A (2,5) +A(3,4) +A(4,5)
-
[单项选择]用链表表示线性表的优点是
A. 便于随机存取
B. 花费的存储空间较顺序存储少
C. 便于插入和删除操作
D. 数据元素的物理顺序与逻辑顺序相同
-
[单项选择]下列程序的执行结果为
Private Sub Command1_Click( )
Dim FirStr As String
FirSt = "abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat( xStr As String) As String
Dim tempStr As String, strLen As Integer
tempStr =""
strLen = Len(xStr)
i=1
Do While i<=Len(xStr)-3
tempStr = tempStr + Mid(xStr, i, 1 ) + Mid(xStr, strLen - i + 1, 1 )
i=i+1
Loop
Pat = tempStr
End Function
A. abcdef
B. afbecd
C. fedcba
D. defabc
-
[填空题]下面程序是用冒泡法将数组a中的10个整数按升序排列,请将程序补充完整。
Private Sub Command1_Click( )
Dim a, Tmp As Integer
a = Array (678,45,324,528,439,387,87,875,273,823)
For i = 【12】
Forj =0 To 9
Ifa (i)<a(j) Then
Tmp = a(i): a(i) = a(j) i a(j) = Tmp
End If
Next j,i
For i = 0 To 9
Print a(i)
Next
End Sub
-
[单项选择]下列程序段的执行结果为
i=4:x=5:Do
i=i+1; x=x+2
Loop Until i>=7
Print "i=";i
Print "x=";x
A. i=4 x=5
B. i=7 x=15
C. i=6 x=8
D. i=7 x=11
-
[单项选择]有如下程序:
Private Sub Form_Click( )
Dim i As Integer, Sum As Integer
Sum = 0
For i = 2 To 10
If i Mod 2=0 And i Mod 3<>0 Then
Sum = Sum + i
End If
Next
Print Sum
End Sub
程序运行后,单击窗体,输出结果为
A. 12
B. 30
C. 24
D. 18
-
[填空题]函数Str$(256.36)的值是 【7】 。
-
[单项选择]有如下函致:
Function fact(x As Integer)As Long
Dim p As Long,i As Integer
p=1
For i=1 To x
p=p*1
Next
fact=p
End Function
调用它的事件过程如下:
Private Sub Command1_Click( )
i=Val(Inputbox("请输入数据"))
a=fact((i))
Print a
End Sub
若输入数据5,则运行结果为
A. 120
B. 60
C. 80
D. 100
-
[单项选择]以下语句中那句可以选择指定的表项或取消已选择的表项
A. 列表框.Selected(索引值)
B. 列表框.Selected(索引值);True
C. 列表框.Selected
D. 列表框.Selected=True
-
[填空题]软件工程研究的内容主要包括: 【4】 技术和软件工程管理。
-
[填空题]一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的 【3】 。
-
[单项选择]在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是
A. 数据库系统
B. 文件系统
C. 人工管理
D. 数据项管理
-
[单项选择]编写如下两个事件过程:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Cb_r(KeyCode)
End Sub
Private Sub Form_KeyPress( KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时)运行程序,如果按“A”键,则程序输出的结果是
A. A
B. a
C. A
D. a
-
[单项选择]下列命令按钮的事件过程执行后,输出的结果是
Private Sub command1_click( )
For m=1 To 10 Step 2
a=10
For n=1 To 10 Srep 2
a=a+2
Next
Next
Print a
End Sub
A. 60
B. 50
C. 30
D. 20
-
[单项选择]将一个窗体设置为MDI子窗体的方法是
A. 将窗体的名称改为MDI
B. 将窗体的MDIChild属性设为True
C. 将窗体的MDIChild属性设为False
D. 将窗体的Enabled属性设为False
-
[单项选择]检查软件产品是否符合需求定义的过程称为
A. 确认测试
B. 集成测试
C. 验证测试
D. 验收测试
-
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
For i =1 To 4
x=4
For j = 1 To 3
x=3
For k = 1 To 2
x=x+6
Next
Next
Next
Print x
End Sub
程序运行后,单击命令按钮,输出的结果是
A. 7
B. 15
C. 157
D. 538
-
[单项选择]目录列表框Path属性的作用是
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示录前驱动器或指定驱动器上的某目录下的文件
C. 显示根目录下的文件名
D. 显示路径下的文件
-
[单项选择]应用数据库的主要目的是
A. 解决数据保密问题
B. 解决数据完整性问题
C. 解决数据共享问题
D. 解决数据量大的问题
-
[单项选择]算法的空间复杂度是指
A. 算法程序的长度
B. 算法程序中的指令条数
C. 算法程序所占的存储空间
D. 执行算法需要的内存空间
-
[单项选择]假定有下表所列的菜单结构:
标题 | 名称 | 层次 |
显示 大图标 小图标 | appear bigicon smallicon | 1(主菜单) 2(子菜单) 2(子菜单) |
要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
A. Private Sub bigicon_Click( )
B. Private Sub bigicon_Click( )
C. Private Sub bigicon_Click()
D. Private Sub bigicon_Click()
-
[单项选择]函数过程Fun1的功能是:如果参数b为奇数,则返回值为1, 否则返回值为0。
Function Fun1 (b As Integer)
if ______ Then
Fun1 =0
Else
Fun1 = 1
End If
End Function
使该功能完整,应在空行处填入以下哪条语句
A. b Mod 2<>0
B. b Mod 2 =0
C. b/2 = 1
D. b/2 =0
-
[单项选择]下列可以启动Visual Basic的方法是
A. 打开“我的电脑”,找到存放Visual Basic所在系统文件的硬盘及文件夹,双击“VB6.exe”图标
B. 在DOS窗口中,键入Visual Basic的路径,执行Visual Basic可执行文件
C. 利用“开始”菜单中的“程序”命令可启动Visual Basic
D. A) 和C)
-
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Option Base 1
Private Sub Command1_Click( )
Dim a
s=0:j =1
a = Array(1,2,3,4)
For i=4 To 1 Step -1
s =s +a(i) *j
j=j * 10
Next
Print s
End Sub
运行上面的程序并单击命令按钮,其输出结果是
A. 4221
B. 1234
C. 34
D. 12