hz061奥鹏在线作业网欢迎访问

 找回密码
 立即注册
查看: 306|回复: 0

奥鹏在线作业电科21秋《VB程序设计》课程在线作业1

[复制链接]

1万

主题

1万

帖子

5万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
51686
发表于 2021-10-13 14:38:14 | 显示全部楼层 |阅读模式
微信联系
奥鹏在线作业电科21秋《VB程序设计》课程在线作业1
试卷总分:100  得分:100
一、单选题 (共 20 道试题,共 100 分)
1.在窗体中添加一个命令按钮,然后编写如下程序: 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
答案 :A

2.在窗体上画一个名称为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
答案 :A

3.指出下面哪个语句不是写文件语句( )。
A.Print
B.Output
C.Write
D.Put
答案 :B

4.窗体上有一组合框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)


5.设组合框Combo1中有三个项目,则以下能删除最后一项的语句是( )。
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem 2
C.Combo1.RemoveItem 3
D.Combo1.RemoveItem Combo1.Listcount


6.设有如下通用过程: 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


7.为了把一个记录型变量的内容写入文件中指定的位置,要使用语句( )。
A.Get文件号,记录号,变量名
B.Get文件号,变量名,记录号
C.Put文件号,变量名,记录号
D.Put文件号,记录号,变量名


8.在下列动作中,不能引发命令按钮Click事件的是( )。
A.在按钮上单击鼠标左键
B.在按钮上单击鼠标右键
C.把焦点转移到按钮上,然后按回车
D.如果按钮有快捷字母键,按Alt+快捷字母键


9.在窗体上画一个名称为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


10.设有如下程序: 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


11.在调用“打开”或“保存”文件对话框时,如果需要指定文件列表框列出的文件类型是.doc文件,则正确的描述格式是( )。
A.CommonDialog1.Filter=“*.DOC|*.doc”
B.CommonDialog1.Filter=“文本文件(.doc)|(*.doc)”
C.CommonDialog1.Filter=“text(.doc)||(*.doc)”
D.CommonDialog1.Filter=“text(.doc)(*.doc)”


12.如果要在菜单中添加一个分隔线,则应将其Caption属性设置为( )。
A.*
B.=
C.&
D.-


13.下列哪个属性设置文本框中文字的对齐方式( )。
A.SelLength
B.Alignment
C.Multiline
D.ScrollBars


14.以下能判断是否到达文件尾的函数是( )。
A.BOF
B.LOC
C.LOF
D.EOF


15.下面叙述错误的是( )。
A.驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B.目录列表框DirListBox显示当前驱动器分层目录树
C.文件列表框FileListBox显示选定目录中的所有文件
D.文件列表框FileName属性是设定允许显示文件名的文件类型


16.设a=10,b=5,c=1,执行语句Print a>b>c后,窗体上显示的是( )。
A.True
B.False
C.1
D.出错信息


17.在窗体上画一个名称为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.无数据输出


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


19.执行语句:Open "Tel.dat" For Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是( )。
A.只能写,不能读
B.只能读,不能写
C.既可以读,也可以写
D.不能读,不能写


20.Sub过程与Function函数的最根本区别是( )。
A.Function过程可以有参数,而Sub过程不可以
B.两种过程参数的传递方式不同
C.Sub过程无返回值,但Function过程有返回值
D.Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用
奥鹏在线作业电科21秋《VB程序设计》课程在线作业2
试卷总分:100  得分:100
一、单选题 (共 20 道试题,共 100 分)
1.当一个工程含有多个窗体时,其中的启动窗体是( )。
A.启动Vosual Basic时建立的窗体
B.第一个添加的窗体
C.最后一个添加的窗体工程属性
D.在“工程属性”对话框中指定的窗体
答案 :D

2.图像框有一个属性,可以自动调整图形的大小,以适应图像框的尺寸,该属性是( )。
A.Autosize
B.Stretch
C.Autoredraw
D.Appearance
答案 :B

3.使文本框获得焦点的方法是( )。
A.GotFocus
B.Change
C.ListFocus
D.SetFocus
答案 :D

4.在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,要求每一秒钟在文本框中显示一次当前的时间,程序为: Private Sub Timer1____() TxtTime.text=Time End Sub 在横线上应填入的内容是( )。
A.Enabled
B.Visible
C.Interval
D.Timer


5.在窗体上画一个命令按钮(其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


6.在窗体上创建一个名称为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程序设计”


7.下列属性中哪个不是图片框的属性( )。
A.Align
B.Picture
C.Stretch
D.AutoRedraw


8.ADO数据控件的RecordSoure属性是表示( )。
A.与ADO数据控件连接的数据库
B.与数据库的连接方式
C.数据库类型
D.ADO数据控件可访问的数据来源


9.代码Command1.Caption=”退出”,其中Command1是( ),Caption是( ),“退出”是( )。请选择一个正确答案( )。
A.方法,事件,属性
B.对象,属性,值
C.对象,方法,值
D.方法,对象,值


10.下列哪些方法不属于通用对话框( )。
A.ShowColor
B.ShowFont
C.ShowPrint
D.ShowList


11.如果要改变窗体的标题,则需要设置的属性是( )。
A.Caption
B.Name
C.BackColor
D.Borderstyle


12.定义一个常量PI,可以使用下列语句中的( )。
A..PI=3.14159
B.Set PI = 3.14159
C.Const PI = 3.14159
D.Const PI


13.下列哪种说法正确的是( )。
A.通用对话框是Visual Basic 6.0的内部标准控件
B.要使用CommonDialog控件,必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C.打开“部件”对话框只有一种方法
D.程序运行过程中,通用对话框在窗体中是可见的


14.ADO控件的RecordSet对象表示( )。
A.使用ADO控件连接的表
B.使用ADO控件返回的查询结果
C.使用ADO控件建立的筛选条件
D.使用ADO控件添加的数据


15.用下面语句定义的数组,其元素个数是( )。 Dim A (-3 To 5) As Integer
A.6
B.7
C.8
D.9


16.设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)


17.下列列表框属性中哪一项不是数组( )。
A.Selected
B.ListCount
C.List
D.Index


18.能够触发文本框Chang事件的操作是( )。
A.文本框失去焦点
B.文本框获得焦点
C.设置文本框的焦点
D.改变文本框的内容


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


20.刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是( )。
A.单选按钮
B.图片框
C.通用对话框
D.文本框
奥鹏在线作业电科21秋《VB程序设计》课程在线作业3
试卷总分:100  得分:100
一、单选题 (共 20 道试题,共 100 分)
1.将命令按钮设为默认命令按钮,应设置为True的属性是( )。
A.Value
B.Cancel
C.Default
D.Enabled
答案 :C

2.DataCombo控件的RowSource属性是表示( )。
A.给DataComebo控件提供列表项的字段
B.目的表的数据源
C.给DataCombo控件提供列表项的数据源
D.更新目的表的字段
答案 :C

3.在下列动作中,不能引发命令按钮Click事件的是( )。
A.在按钮上单击鼠标左键
B.在按钮上单击鼠标右键
C.把焦点转移到按钮上,然后按回车
D.如果按钮有快捷字母键,按Alt+快捷字母键
答案 :B

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


5.可以与ADO数据控件绑定的控件必须具有( )属性。
A.Connectionstring
B.Caption
C.DataSource
D.RecordSource


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


7.在Visual Basic6.0中,改变控制的位置可以通过设置( )属性来实现。
A.Left和Top
B.Width和Height
C.Left和Height
D.Width和Top


8.当拖动滚动条中的滚动块时,将触发滚动条的哪个事件( )。
A.Move
B.Change
C.Scroll
D.SetFocus


9.下列哪种说法正确的是( )。
A.通用对话框是Visual Basic 6.0的内部标准控件
B.要使用CommonDialog控件,必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C.打开“部件”对话框只有一种方法
D.程序运行过程中,通用对话框在窗体中是可见的


10.在窗体上画一个命令按钮(其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


11.关于复选框和单选按钮的Value属性,说法正确的是( )。
A.复选框的Value属性有2个值
B.单选按钮的Value属性有3个值
C.Value属性的值都是True或False
D.复选框的Value属性有3个值


12.Sub过程与Function函数的最根本区别是( )。
A.Function过程可以有参数,而Sub过程不可以
B.两种过程参数的传递方式不同
C.Sub过程无返回值,但Function过程有返回值
D.Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用


13.目录列表框的Path属性的作用是( )。
A.显示当前驱动器或指定驱动器上的目录结构
B.显示当前驱动器或指定驱动器上的某目录下的文件名
C.显示根目录下的文件名
D.显示该路径下的文件


14.有关控件数组特点,下面表达正确的是( )。
A.Name相同,Intex不同
B.Name相同,Caption也相同
C.Name相同,ID不同
D.Name相同,TabIntex不同


15.在窗体上画一个名称为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


16.执行语句:Open "Tel.dat" For Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是( )。
A.只能写,不能读
B.只能读,不能写
C.既可以读,也可以写
D.不能读,不能写


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.定时器控件Interval属性最多只能设置( )。
A.1分多钟
B.半分多钟
C.2分多钟
D.10分钟


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


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用来设置鼠标当前位置的坐标



所有内容为网上转载如有侵权通知作者立即删除

更多答案加微信hz321060 联系哦
上一篇:奥鹏在线作业电科21秋《unix操作系统》课程在线作业123
下一篇:电科21秋《财务管理学》课程在线作业123
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

微信联系

QQ|有问题联系本站客服|hz061奥鹏在线作业奥鹏作业习题网奥鹏离线习题

GMT+8, 2021-10-24 01:00 , Processed in 0.111159 second(s), 24 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表