电子科大《VB程序设计》在线作业1
试卷总分:100
单选题
一、单选题(共 20 道试题,共 100 分。)
V
1. 在窗体上创建一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后,如果按A键,然后单击窗体,则在窗体上显示的内容是( )。
A. Visual Basic
B. “程序设计”
C. “A程序设计”
D. “Visual BasiC++程序设计”
此题选: D 满分:5 分
2. ADO数据控件的RecordSoure属性是表示( )。
A. 与ADO数据控件连接的数据库
B. 与数据库的连接方式
C. 数据库类型
D. ADO数据控件可访问的数据来源
此题选: D 满分:5 分
3. DataCombo控件的RowSource属性是表示( )。
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
满分:5 分
4. 将命令按钮设为默认命令按钮,应设置为True的属性是( )。
A. Value
B. Cancel
C. Default
D. Enabled
满分:5 分
5. 为了保留动态数组中原有元素的值,需要使用关健字( )。
A. Static
B. Preserve
C. Option Base
D. Option Compare
满分:5 分
6. 可以与ADO数据控件绑定的控件必须具有( )属性。
A. Connectionstring
B. Caption
C. DataSource
D. RecordSource
满分:5 分
7. 定义一个常量PI,可以使用下列语句中的( )。
A. .PI=3.14159
B. Set PI = 3.14159
C. Const PI = 3.14159
D. Const PI
满分:5 分
8. 在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() S = 0 For i = 1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是( )。
A. 1
B. 5
C. 27
D. 45
满分:5 分
9. 执行语句:Open "Tel.dat" For Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是( )。
A. 只能写,不能读
B. 只能读,不能写
C. 既可以读,也可以写
D. 不能读,不能写
满分:5 分
10. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Move 500,500 End Sub 程序运行后,单击命令按钮,执行的操作为( )。
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
满分:5 分
11. 代码Command1.Caption=”退出”,其中Command1是( ),Caption是( ),“退出”是( )。请选择一个 满分:5 分
12. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a = 0 Print s; a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是( )。
A. 7 9
B. 34 0
C. 9 7
D. 死循环
满分:5 分
13. Sub过程与Function函数的最根本区别是( )。
A. Function过程可以有参数,而Sub过程不可以
B. 两种过程参数的传递方式不同
C. Sub过程无返回值,但Function过程有返回值
D. Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用
满分:5 分
14. ADO控件的RecordSet对象表示( )。
A. 使用ADO控件连接的表
B. 使用ADO控件返回的查询结果
C. 使用ADO控件建立的筛选条件
D. 使用ADO控件添加的数据
满分:5 分
15. 在窗体上画一个命令按钮(其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
满分:5 分
16. 在下列动作中,不能引发命令按钮Click事件的是( )。
A. 在按钮上单击鼠标左键
B. 在按钮上单击鼠标右键
C. 把焦点转移到按钮上,然后按回车
D. 如果按钮有快捷字母键,按Alt+快捷字母键
满分:5 分
17. 在Visual Basic6.0中,改变控制的位置可以通过设置( )属性来实现。
A. Left和Top
B. Width和Height
C. Left和Height
D. Width和Top
满分:5 分
18. 用下面语句定义的数组,其元素个数是( )。 Dim A (-3 To 5) As Integer
A. 6
B. 7
C. 8
D. 9
此题选: D 满分:5 分
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. 无数据输出
满分:5 分
20. 在窗体上画一个名称为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 Is 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是( )。
A. 10
B. 20
C. 30
D. 40
满分:5 分
电子科大《VB程序设计》在线作业2
试卷总分:100
单选题
一、单选题(共 20 道试题,共 100 分。)
V
1. 下列哪些方法不属于通用对话框( )。
A. ShowColor
B. ShowFont
C. ShowPrint
D. ShowList
此题选: D 满分:5 分
2. 如果要改变窗体的标题,则需要设置的属性是( )。
A. Caption
B. Name
C. BackColor
D. Borderstyle
满分:5 分
3. 在窗体中添加一个命令按钮,然后编写如下程序: 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
满分:5 分
4. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Array1(10,10) As Integer Dim i As Integer, 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. 15
B. 14
C. 13
D. 12
此题选: D 满分:5 分
5. 在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是( )。
A. 11
B. 10
C. 9
D. 8
满分:5 分
6. 为了把一个记录型变量的内容写入文件中指定的位置,要使用语句( )。
A. Get文件号,记录号,变量名
B. Get文件号,变量名,记录号
C. Put文件号,变量名,记录号
D. Put文件号,记录号,变量名
此题选: D 满分:5 分
7. 窗体的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用来设置鼠标当前位置的坐标
满分:5 分
8. 指出下面哪个语句不是写文件语句( )。
A. Print
B. Output
C. Write
D. Put
满分:5 分
9. 如果要在菜单中添加一个分隔线,则应将其Caption属性设置为( )。
A. *
B. =
C.
D. -
此题选: D 满分:5 分
10. 目录列表框的Path属性的作用是( )。
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示该路径下的文件
满分:5 分
11. 在调用“打开”或“保存”文件对话框时,如果需要指定文件列表框列出的文件类型是.doc文件,则正确的描述格式是( )。
A. CommonDialog1.Filter=“*.DOC *.doc”
B. CommonDialog1.Filter=“文本文件(.doc) (*.doc)”
C. CommonDialog1.Filter=“text(.doc) (*.doc)”
D. CommonDialog1.Filter=“text(.doc)(*.doc)”
满分:5 分
12. 设a=10,b=5,c=1,执行语句Print a b c后,窗体上显示的是( )。
A. True
B. False
C. 1
D. 出错信息
满分:5 分
13. 下列哪种说法正确的是( )。
A. 通用对话框是Visual Basic 6.0的内部标准控件
B. 要使用CommonDialog控件,必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C. 打开“部件”对话框只有一种方法
D. 程序运行过程中,通用对话框在窗体中是可见的
满分:5 分
14. 设有语句:x=InputBox("输入数值","0","示例") 程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是( )。
A. 变量x的值是数值10
B. 在inputbox对话框标题栏中显示的是“示例”
C. 0是默认值
D. 变量x的值是字符串“10”
此题选: D 满分:5 分
15. 以下关于焦点的叙述中,错误的是( )。
A. 如果文本框的TabStop属性为False,则不能接收从键盘输入的数据
B. 当文本框失去焦点时,触发LostFocus事件
C. 当文本框的Enabled属性为False时,其Tab顺序不起作用
D. 可以用TabIndex属性改变Tab顺序
满分:5 分
16. 当一个工程含有多个窗体时,其中的启动窗体是( )。
A. 启动Vosual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体工程属性
D. 在“工程属性”对话框中指定的窗体
此题选: D 满分:5 分
17. 设a=3,b=5,则以下表达式值为真的是( )。
A. a =b And b 10
B. a b) or (b 0)
C. (a 0) Eqv (b 0)
D. (-3=5 a) And (b 0)
满分:5 分
18. 下面叙述错误的是( )。
A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B. 目录列表框DirListBox显示当前驱动器分层目录树
C. 文件列表框FileListBox显示选定目录中的所有文件
D. 文件列表框FileName属性是设定允许显示文件名的文件类型
此题选: D 满分:5 分
19. 设组合框Combo1中有三个项目,则以下能删除最后一项的语句是( )。
A. Combo1.RemoveItem Text
B. Combo1.RemoveItem 2
C. Combo1.RemoveItem 3
D. Combo1.RemoveItem Combo1.Listcount
满分:5 分
20. 以下能判断是否到达文件尾的函数是( )。
A. BOF
B. LOC
C. LOF
D. EOF
此题选: D 满分:5 分
试卷总分:100
单选题
一、单选题(共 20 道试题,共 100 分。)
V
1. 在窗体上创建一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后,如果按A键,然后单击窗体,则在窗体上显示的内容是( )。
A. Visual Basic
B. “程序设计”
C. “A程序设计”
D. “Visual BasiC++程序设计”
此题选: D 满分:5 分
2. ADO数据控件的RecordSoure属性是表示( )。
A. 与ADO数据控件连接的数据库
B. 与数据库的连接方式
C. 数据库类型
D. ADO数据控件可访问的数据来源
此题选: D 满分:5 分
3. DataCombo控件的RowSource属性是表示( )。
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
满分:5 分
4. 将命令按钮设为默认命令按钮,应设置为True的属性是( )。
A. Value
B. Cancel
C. Default
D. Enabled
满分:5 分
5. 为了保留动态数组中原有元素的值,需要使用关健字( )。
A. Static
B. Preserve
C. Option Base
D. Option Compare
满分:5 分
6. 可以与ADO数据控件绑定的控件必须具有( )属性。
A. Connectionstring
B. Caption
C. DataSource
D. RecordSource
满分:5 分
7. 定义一个常量PI,可以使用下列语句中的( )。
A. .PI=3.14159
B. Set PI = 3.14159
C. Const PI = 3.14159
D. Const PI
满分:5 分
8. 在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() S = 0 For i = 1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是( )。
A. 1
B. 5
C. 27
D. 45
满分:5 分
9. 执行语句:Open "Tel.dat" For Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是( )。
A. 只能写,不能读
B. 只能读,不能写
C. 既可以读,也可以写
D. 不能读,不能写
满分:5 分
10. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Move 500,500 End Sub 程序运行后,单击命令按钮,执行的操作为( )。
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
满分:5 分
11. 代码Command1.Caption=”退出”,其中Command1是( ),Caption是( ),“退出”是( )。请选择一个 满分:5 分
12. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a = 0 Print s; a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是( )。
A. 7 9
B. 34 0
C. 9 7
D. 死循环
满分:5 分
13. Sub过程与Function函数的最根本区别是( )。
A. Function过程可以有参数,而Sub过程不可以
B. 两种过程参数的传递方式不同
C. Sub过程无返回值,但Function过程有返回值
D. Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用
满分:5 分
14. ADO控件的RecordSet对象表示( )。
A. 使用ADO控件连接的表
B. 使用ADO控件返回的查询结果
C. 使用ADO控件建立的筛选条件
D. 使用ADO控件添加的数据
满分:5 分
15. 在窗体上画一个命令按钮(其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
满分:5 分
16. 在下列动作中,不能引发命令按钮Click事件的是( )。
A. 在按钮上单击鼠标左键
B. 在按钮上单击鼠标右键
C. 把焦点转移到按钮上,然后按回车
D. 如果按钮有快捷字母键,按Alt+快捷字母键
满分:5 分
17. 在Visual Basic6.0中,改变控制的位置可以通过设置( )属性来实现。
A. Left和Top
B. Width和Height
C. Left和Height
D. Width和Top
满分:5 分
18. 用下面语句定义的数组,其元素个数是( )。 Dim A (-3 To 5) As Integer
A. 6
B. 7
C. 8
D. 9
此题选: D 满分:5 分
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. 无数据输出
满分:5 分
20. 在窗体上画一个名称为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 Is 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是( )。
A. 10
B. 20
C. 30
D. 40
满分:5 分
电子科大《VB程序设计》在线作业2
试卷总分:100
单选题
一、单选题(共 20 道试题,共 100 分。)
V
1. 下列哪些方法不属于通用对话框( )。
A. ShowColor
B. ShowFont
C. ShowPrint
D. ShowList
此题选: D 满分:5 分
2. 如果要改变窗体的标题,则需要设置的属性是( )。
A. Caption
B. Name
C. BackColor
D. Borderstyle
满分:5 分
3. 在窗体中添加一个命令按钮,然后编写如下程序: 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
满分:5 分
4. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Array1(10,10) As Integer Dim i As Integer, 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. 15
B. 14
C. 13
D. 12
此题选: D 满分:5 分
5. 在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是( )。
A. 11
B. 10
C. 9
D. 8
满分:5 分
6. 为了把一个记录型变量的内容写入文件中指定的位置,要使用语句( )。
A. Get文件号,记录号,变量名
B. Get文件号,变量名,记录号
C. Put文件号,变量名,记录号
D. Put文件号,记录号,变量名
此题选: D 满分:5 分
7. 窗体的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用来设置鼠标当前位置的坐标
满分:5 分
8. 指出下面哪个语句不是写文件语句( )。
A. Print
B. Output
C. Write
D. Put
满分:5 分
9. 如果要在菜单中添加一个分隔线,则应将其Caption属性设置为( )。
A. *
B. =
C.
D. -
此题选: D 满分:5 分
10. 目录列表框的Path属性的作用是( )。
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示该路径下的文件
满分:5 分
11. 在调用“打开”或“保存”文件对话框时,如果需要指定文件列表框列出的文件类型是.doc文件,则正确的描述格式是( )。
A. CommonDialog1.Filter=“*.DOC *.doc”
B. CommonDialog1.Filter=“文本文件(.doc) (*.doc)”
C. CommonDialog1.Filter=“text(.doc) (*.doc)”
D. CommonDialog1.Filter=“text(.doc)(*.doc)”
满分:5 分
12. 设a=10,b=5,c=1,执行语句Print a b c后,窗体上显示的是( )。
A. True
B. False
C. 1
D. 出错信息
满分:5 分
13. 下列哪种说法正确的是( )。
A. 通用对话框是Visual Basic 6.0的内部标准控件
B. 要使用CommonDialog控件,必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C. 打开“部件”对话框只有一种方法
D. 程序运行过程中,通用对话框在窗体中是可见的
满分:5 分
14. 设有语句:x=InputBox("输入数值","0","示例") 程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是( )。
A. 变量x的值是数值10
B. 在inputbox对话框标题栏中显示的是“示例”
C. 0是默认值
D. 变量x的值是字符串“10”
此题选: D 满分:5 分
15. 以下关于焦点的叙述中,错误的是( )。
A. 如果文本框的TabStop属性为False,则不能接收从键盘输入的数据
B. 当文本框失去焦点时,触发LostFocus事件
C. 当文本框的Enabled属性为False时,其Tab顺序不起作用
D. 可以用TabIndex属性改变Tab顺序
满分:5 分
16. 当一个工程含有多个窗体时,其中的启动窗体是( )。
A. 启动Vosual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体工程属性
D. 在“工程属性”对话框中指定的窗体
此题选: D 满分:5 分
17. 设a=3,b=5,则以下表达式值为真的是( )。
A. a =b And b 10
B. a b) or (b 0)
C. (a 0) Eqv (b 0)
D. (-3=5 a) And (b 0)
满分:5 分
18. 下面叙述错误的是( )。
A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B. 目录列表框DirListBox显示当前驱动器分层目录树
C. 文件列表框FileListBox显示选定目录中的所有文件
D. 文件列表框FileName属性是设定允许显示文件名的文件类型
此题选: D 满分:5 分
19. 设组合框Combo1中有三个项目,则以下能删除最后一项的语句是( )。
A. Combo1.RemoveItem Text
B. Combo1.RemoveItem 2
C. Combo1.RemoveItem 3
D. Combo1.RemoveItem Combo1.Listcount
满分:5 分
20. 以下能判断是否到达文件尾的函数是( )。
A. BOF
B. LOC
C. LOF
D. EOF
此题选: D 满分:5 分
版权声明
声明:有的资源均来自网络转载,版权归原作者所有,如有侵犯到您的权益
请联系本站我们将配合处理!
上一篇 : 13春《TCPIP协议》在线作业3
下一篇 : 13春电子科大《unix操作系统》在线作业3