电子科技大学22春“计算机应用技术”《VB程序设计》综合作业三辅导答案3

书山有路勤为径，学海无涯苦作舟！ 住在富人区的她电子科技大学22春“计算机应用技术”VB程序设计综合作业三辅导答案一.综合考核(共50题)1.下面叙述错误的是()。A.驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器B.目录列表框DirListBox显示当前驱动器分层目录树C.文件列表框FileListBox显示选定目录中的所有文件D.文件列表框FileName属性是设定允许显示文件名的文件类型参考答案：D2.窗体上有一组合框Combol,窗体加载时的代码如下： Private Sub Form_Load() Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD” Combol. AddItem“组合音响” End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是()。A.Textl.Text=Combol.List(3)B.Textl.Text=Combol.List(2)C.Textl.Text=Combol.List(1)D.Textl.Text=Combol.List(0)参考答案：B3.设有语句：x=InputBox(“输入数值”，“0”，“示例”)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是()。A.在box对话框标题栏中显示的是“示例”B.变量x的值是数值10C.变量x的值是字符串“10”D.0是默认值参考答案：C4.以下声明语句中错误的是()。A.Const var1=123B.Dim var2=ABCC.Public a，b as integerD.Static a as single参考答案：B5.在窗体中添加一个命令按钮，然后编写如下程序： 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.456B.246C.123123D.123参考答案：B6.Sub过程与Function函数的最根本区别是()。A.两种过程参数的传递方式不同B.Sub过程是语句级调用，可以使用Call或直接使用过程名，但Function过程是在表达式中调用C.Sub过程无返回值，但Function过程有返回值D.Function过程可以有参数，而Sub过程不可以参考答案：C7.一个工程含有多个窗体时，其中的启动窗体是第一个添加的窗体。()A.正确B.错误参考答案：B8.ADO数据控件的RecordSoure属性是表示()。A.数据库类型B.与数据库的连接方式C.与ADO数据控件连接的数据库D.ADO数据控件可访问的数据来源参考答案：D9.VB集成开发环境有三种工作状态，不属于三种工作状态之一的是()。A.设计状态B.编写代码状态C.运行状态D.中断状态参考答案：B10.当拖动滚动条中的滚动块时，将触发滚动条的哪个事件()。A.SetFocusB.ScrollC.MoveD.Change参考答案：B11.在窗体上画一个名称为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 array(I，J)=I+j Next j Next I Text1，Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。A.15B.14C.13D.12参考答案：D12.下列哪个属性设置文本框中文字的对齐方式()。A.SelLengthB.ScrollBarsC.MultilineD.Alignment参考答案：D13.设有如下程序： 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.7654B.6543C.5432D.4321参考答案：B14.刚建立一个新的标准工程后，不在工具箱中出现的控件是()。A.通用对话框B.文本框C.图片框D.单选按钮参考答案：B15.在窗体上有一个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为 Private Sub Timer1 TxtTime.text=Time End Sub 在横线上应填入的内容是()。A.VisibleB.TimerC.IntervalD.Enabled参考答案：B16.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=-5 If x0 Then y=x2 Else y=x End If Print y End Sub 程序运行后，单击命令按钮，窗体上显示的是()。A.-5B.25C.1D.-1参考答案：A17.设有如下通用过程： 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.25B.24C.15D.10参考答案：D18.设组合框Combo1中有三个项目，则以下能删除最后一项的语句是()。A.Combo1.RemoveItem TextB.Combo1.RemoveItem Combo1.ListcountC.Combo1.RemoveItem 3D.Combo1.RemoveItem 2参考答案：D19.在窗体上画一个名称为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.15B.14C.13D.12参考答案：D20.窗体上有一组合框Combol，窗体加载时的代码如下： Private Sub _Load() Combol. AddItem“电视机”Combol. AddItem“录像机”Combol. AddItem“VCD” Combol. AddItem“组合音响” End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是()。A.Textl.TextCombol.List3B.Textl.TextCombol.List2C.Textl.TextCombol.List1D.Textl.TextCombol.List0参考答案：B21.设a=10，b=5，c=1，执行语句Print abc后，窗体上显示的是()。A.TrueB.FalseC.1D.出错信息参考答案：B22.下面()数写成普通的十进制数是2.567E-2。A.0.0002567B.0.02567C.0.002567D.0.00002567参考答案：B23.为了使标签能自动调整大小以显示全部文本内容，应把标签的Autosize属性设置为true。()A.正确B.错误参考答案：A24.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是()。A.StretchB.AutosizeC.AutoredrawD.Appearance参考答案：A25.Load事件是在窗体被装入工作区时()触发的事件。A.用户B.程序员C.手工D.自动参考答案：D26.关于复选框和单选按钮的Value属性，说法正确的是()。A.复选框的Value属性有3个值B.复选框的Value属性有2个值C.单选按钮的Value属性有3个值D.Value属性的值都是True或False参考答案：A27.用下面语句定义的数组，其元素个数是()。 Dim A (-3 To 5) As IntegerA.9B.8C.7D.6参考答案：A28.在Visual Basic6.0中，改变控制的位置可以通过设置()属性来实现。A.Width和TopB.Width和HeightC.Left和TopD.Left和Height参考答案：C29.下列说法中正确的是为了保存一个Visual Basic应用程序，应当()。A.只保存窗体模块文件.frmB.只保存工程文件.vbpC.分别保存工程文件和标准模块文件.basD.分别保存工程文件、窗体文件和标准模块文件参考答案：D30.目录列表框的Path属性的作用是()。A.显示当前驱动器或指定驱动器上某文件夹的路径B.显示当前驱动器或指定驱动器上的某目录下的文件名C.显示根目录下的文件名D.只显示当前路径下的文件参考答案：A31.列表框和组合框主要的不同在于前者能选择多个项目，后者不能。()A.正确B.错误参考答案：B32.执行语句：Open “Tel.dat” For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是()。A.既可以读，也可以写B.只能读，不能写C.只能写，不能读D.不能读，不能写参考答案：A33.指出下面哪个语句不是写文件语句()。A.WriteB.PutC.PrintD.Output参考答案：D34.下列哪些方法不属于通用对话框?()A.ShowPrintB.ShowListC.ShowFontD.ShowColor参考答案：B35.窗体上有一组合框Combol，窗体加载时的代码如下：Private Sub _Load() Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD” Combol. AddItem“组合音响”End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是()。A.Textl.Text=Combol.List(3)B.Textl.Text=Combol.List(2)C.Textl.Text=Combol.List(1)D.Textl.Text=Combol.List(0)参考答案：B36.执行语句：Open“Tel.dat” For Random As#1 Len=50后，对文件Tel.dat中的数据能够执行的操作是()。A.既可以读，也可以写B.只能读，不能写C.只能写，不能读D.不能读，不能写参考答案：A37.在窗体上画一个名称为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.无数据输出B.1 3.4 5.8C.1 4 7D.1 3 5参考答案：D38.以下能判断是否到达文件尾的函数是()。A.LOFB.LOCC.EOFD.BOF参考答案：C39.在窗体上画一个名称为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.无数据输出B.1 3.4 5.8C.1 4 7D.1 3 5参考答案：D40.设在菜单编辑器中定义了一个菜单项，名为Menu1，为了在运行时隐藏该菜单项应使用的语句是()。A.Menu1.Visible=TrueB.Menu1.Visible=FalseC.Menu1.Enabled=TrueD.Menu1.Enabled=False参考答案：B41.代码Command1.Caption=“退出”,其中Command1是()，Caption是()，“退出”是()。请选择一个正确答案。A.方法，对象，值B.方法，事件，属性C.对象，方法，值D.对象，属性，值参考答案：D42.要使一个文本框对象能够显示多行文字，应设置该对象的()属性值为True。A.TextB.MultiLineC.StyleD.Visible参考答案：B43.ADO控件的RecordSet对象表示()。A.使用ADO控件连接的表B.使用ADO控件返回的查询结果C.使用ADO控件添加的数据D.使用ADO控件建立的筛选条件参考答案：B44.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim a，b As Integer a=val(InputBox(“Enter the First integer”) b=val(InputBox(“Enter the Second integer”) Print a b End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入123和456，则输出结果是和()。A.579B.123C.456D.123456参考答案：A45.在窗体中添加一个命令按钮，然后编写如下程序：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.456B.246C.123123D.123参考答案：B46.下列列表框属性中哪一项不是数组?()A.SelectedB.ListCountC.ListD.Index参考答案：B47.下列哪个属性设置文本框中文字的对齐方式?()A.SelLengthB.AlignmentC.MultilineD.ScrollBars参考答案：B48.下面叙述错误的是()。A.驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器B.目录列表框DirListBox显示当前驱动器分层目录树C.文件列表框FileName属性是设定允许显示文件名的文件类型D.文件列表框FileListBox显示选定目录中的所有文件参考答案：C49.下列属性中哪个不是图片框的属性?()A.StretchB.PictureC.AutoRedrawD.Align参考答案：A50.程序流程是指在一个程序中语句的执行次序。()A.正确B.错误参考答案：A