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

admin

【奥鹏】[电子科技大学]18秋《VB程序设计》在线作业3
试卷总分:100    得分:100
第1题,代码Command1.Caption="退出",其中Command1是（   ），Caption是（   ）,"退出"是（   ）。请选择一个正确资料（   ）。
A、方法，事件，属性
B、对象，属性，值
C、对象，方法，值
D、方法，对象，值



第2题,以下叙述中正确的是（   ）。
A、窗体的Name属性指定窗体的名称，用来标识一个窗体
B、窗体的Name属性的值是显示在窗体标题栏中的文本
C、可以在运行期间改变对象的Name属性的值
D、对象的Name属性值可以为空



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



第4题,在Visual Basic6.0中，改变控制的位置可以通过设置（   ）属性来实现。
A、Left和Top
B、Width和Height
C、Left和Height
D、Width和Top



第5题,使文本框获得焦点的方法是（   ）。
A、GotFocus
B、Change
C、ListFocus
D、SetFocus



第6题,在窗体上画一个名称为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



第7题,下列哪种说法正确的是（   ）。
A、通用对话框是Visual Basic 6.0的内部标准控件
B、要使用CommonDialog控件，必须在"工程"菜单下的"部件"对话框中选定"Microsoft Common Dialog Control 6.0"
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题,Sub过程与Function函数的最根本区别是（   ）。
A、Function过程可以有参数，而Sub过程不可以
B、两种过程参数的传递方式不同
C、Sub过程无返回值，但Function过程有返回值
D、Sub过程是语句级调用，可以使用Call或直接使用过程名，但Function过程是在表达式中调用



第10题,下列哪个属性设置文本框中文字的对齐方式（   ）。
A、SelLength
B、Alignment
C、Multiline
D、ScrollBars



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



第12题,以下关于焦点的叙述中，错误的是（   ）。
A、如果文本框的TabStop属性为False，则不能接收从键盘输入的数据
B、当文本框失去焦点时，触发LostFocus事件
C、当文本框的Enabled属性为False时，其Tab顺序不起作用
D、可以用TabIndex属性改变Tab顺序



第13题,设在菜单编辑器中定义了一个菜单项，名为Menu1,为了在运行时隐藏该菜单项应使用的语句是（   ）。
A、Menu1.Enabled=True
B、Menu1.Enabled=False
C、Menu1.Visible=True
D、Menu1.Visible=False



第14题,执行语句：Open "Tel.dat" For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是（   ）。
A、只能写，不能读
B、只能读，不能写
C、既可以读，也可以写
D、不能读，不能写



第15题,下列属性中哪个不是图片框的属性（   ）。
A、Align
B、Picture
C、Stretch
D、AutoRedraw



第16题,设有语句：x=InputBox("输入数值","0","示例")
程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（   ）。
A、变量x的值是数值10
B、在inputbox对话框标题栏中显示的是"示例"
C、0是默认值
D、变量x的值是字符串"10"



第17题,窗体上有一组合框Combol,窗体加载时的代码如下：Private Sub Form_Load()Combol. AddItem"电视机"Combol. AddItem"录像机"Combol. AddItem"VCD"Combol. AddItem"组合音响"End Sub要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（   ）。
A、Textl.Text=Combol.List(0)
B、Textl.Text=Combol.List(1)
C、Textl.Text=Combol.List(2)
D、Textl.Text=Combol.List(3)



第18题,用下面语句定义的数组，其元素个数是（   ）。
Dim A (-3 To 5) As Integer
A、6
B、7
C、8
D、9



第19题,在窗体上画一个名称为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、无数据输出



第20题,在窗体中添加一个命令按钮，然后编写如下程序：
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