电子科大18秋《VB程序设计》在线作业1（100分）

admin

【奥鹏】[电子科技大学]18秋《VB程序设计》在线作业1
试卷总分:100    得分:100
第1题,在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim num As Integer
num = 1
Do Until num  6
Print num;
num = num + 2.4
Loop
End  Sub
程序运行后，单击命令按钮，则窗体上显示的内容是（   ）。
A、1 3.4 5.8
B、1 3 5
C、1 4 7
D、无数据输出



第2题,当一个工程含有多个窗体时，其中的启动窗体是（   ）。
A、启动Vosual Basic时建立的窗体
B、第一个添加的窗体
C、最后一个添加的窗体工程属性
D、在"工程属性"对话框中指定的窗体



第3题,设有如下程序：
Option Base 0
Private Sub Form_Click()
Dim  a
Dim I As Integer
a=Array(1,2,3,4,5,6,7,8,9)
For I=0 To 3
Print a(5 - I);
Next  I
End  Sub
程序运行后，单击窗体，则在窗体上显示的是（   ）。
A、4321
B、5432
C、6543
D、7654



第4题,DataCombo控件的RowSource属性是表示（   ）。
A、给DataComebo控件提供列表项的字段
B、目的表的数据源
C、给DataCombo控件提供列表项的数据源
D、更新目的表的字段



第5题,如果要改变窗体的标题，则需要设置的属性是（   ）。
A、Caption
B、Name
C、BackColor
D、Borderstyle



第6题,在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
s = 0
a = Array (1,2,3,4)
j = 1
For i = 4 To 1 Step - 1
s = s + a (i) * j
j = j * 10
Next i
Print s
End  Sub
运行上面的程序，单击命令按钮，其输出结果是（   ）。
A、4321
B、1234
C、34
D、12



第7题,下列控件哪一个具有Align属性（   ）。
A、图像框
B、图片框
C、标签
D、列表框



第8题,在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：
Private Sub Command1_Click()
n = Text1.Text
Select  Case n
Case 1 To 20
x = 10
Case 2,4,6
x = 20
Case Is10
x = 30
Case 10
x = 40
End Select
Text2.Text = x
End  Sub
程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（   ）。
A、10
B、20
C、30
D、40



第9题,定义一个常量PI，可以使用下列语句中的（   ）。
A、.PI=3.14159
B、Set PI = 3.14159
C、Const PI = 3.14159
D、Const PI



第10题,在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim array1(10,10) As Integer
Dim I, j As Integer
For I=1 To 3
For j=2 To 4
array1(I, j)=I+j
Next j
Next I
Text1.Text=array1(2,3)+array1(3,4)
End  Sub
程序运行后，单击命令按钮，在文本框中显示的值是（   ）。
A、12
B、13
C、14
D、15



第11题,下列列表框属性中哪一项不是数组（   ）。
A、Selected
B、ListCount
C、List
D、Index



第12题,如果要在菜单中添加一个分隔线，则应将其Caption属性设置为（   ）。
A、*
B、=
C、&
D、-



第13题,在窗体中添加一个命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=InputBox("Enter the Firstinteger")
b=InputBox("Enter the Secondinteger")
Print b+a
End  Sub
程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（   ）。
A、246
B、123
C、456
D、123123



第14题,为了把一个记录型变量的内容写入文件中指定的位置，要使用语句（   ）。
A、Get文件号，记录号，变量名
B、Get文件号，变量名，记录号
C、Put文件号，变量名，记录号
D、Put文件号，记录号，变量名



第15题,ADO控件的RecordSet对象表示（   ）。
A、使用ADO控件连接的表
B、使用ADO控件返回的查询结果
C、使用ADO控件建立的筛选条件
D、使用ADO控件添加的数据



第16题,代码Command1.Caption="退出",其中Command1是（   ），Caption是（   ）,"退出"是（   ）。请选择一个正确资料（   ）。
A、方法，事件，属性
B、对象，属性，值
C、对象，方法，值
D、方法，对象，值



第17题,设有如下通用过程：
Public Sub Fun(a(),ByVal x As Integer)
For i = 1 To 5
x = x + a(i)
Next
End  Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程
Private Sub Command1_Click()Dim arr(5) As Variant
For i = 1 To 5
arr(i) = i
Next
n = 10
Call Fun(arr(), n)
Text1.Text = n
End  Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是（   ）。
A、10
B、15
C、25
D、24



第18题,刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（   ）。
A、单选按钮
B、图片框
C、通用对话框
D、文本框



第19题,图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是（   ）。
A、Autosize
B、Stretch
C、Autoredraw
D、Appearance



第20题,窗体的MouseDown事件过程如下：
Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single)
其中有4个参数，关于这些参数，正确的描述是（   ）。
A、通过Button参数判定当前按下的是哪一个鼠标键
B、Shift参数只能用来确定是否按下Shift键
C、Shift参数只能用来确定是否按下Alt键和Ctrl键
D、参数x、y用来设置鼠标当前位置的坐标