电子科技大学22春“计算机应用技术”《VB程序设计》离线作业（一）辅导答案35

《电子科技大学22春“计算机应用技术”《VB程序设计》离线作业（一）辅导答案35》由会员分享，可在线阅读，更多相关《电子科技大学22春“计算机应用技术”《VB程序设计》离线作业（一）辅导答案35（7页珍藏版）》请在装配图网上搜索。

1、书山有路勤为径，学海无涯苦作舟！ 住在富人区的她电子科技大学22春“计算机应用技术”VB程序设计离线作业（一）辅导答案一.综合考核(共50题)1.下列哪些方法不属于通用对话框?()A.ShowPrintB.ShowListC.ShowFontD.ShowColor参考答案：B2.事件可以由用户引发，也可以由系统引发。()A.正确B.错误参考答案：A3.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是()。A.通用对话框B.文本框C.图片框D.单选按钮参考答案：B4.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与之同步

2、改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是()。A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_KeyPress参考答案：A5.在窗体上画一个名称为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、3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。A.15B.14C.13D.12参考答案：D6.在窗体上画一个名称为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参考答案：A7.在多窗体程序中，每个窗体都可以建立自己的菜单系统。()A.正确B.错误参考答案：A8.如果要在菜单中添加一个分隔线，则应将其Cap

4、tion属性设置为()。A.=B.-C.*D.&参考答案：B9.在窗体上画一个名称为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参考答案：D10.可以与ADO数据控件绑定的控件必须具有()属性。A.RecordSourceB.DataSourceC.Co

5、nnectionstringD.Caption参考答案：B11.如果要改变窗体的标题，则需要设置的属性是()。A.NameB.CaptionC.BorderstyleD.BackColor参考答案：B12.目录列表框的Path属性的作用是()。A.显示该路径下的文件B.显示根目录下的文件名C.显示当前驱动器或指定驱动器上的目录结构D.显示当前驱动器或指定驱动器上的某目录下的文件名参考答案：C13.在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s=0 a=Array

6、 (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.4321B.34C.1234D.12参考答案：C14.设有如下通用过程： 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() Di

7、m 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参考答案：D15.在窗体上画一个名称为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 a

8、rray1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。A.15B.14C.13D.12参考答案：D16.为了使标签能自动调整大小以显示全部文本内容，应把标签的Autosize属性设置为true。()A.正确B.错误参考答案：A17.在窗体上有一个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为 Private Sub Timer1 TxtTime.text=Time End Sub

9、在横线上应填入的内容是()。A.VisibleB.TimerC.IntervalD.Enabled参考答案：B18.定时器控件Interval属性最多只能设置()。A.半分多钟B.2分多钟C.1分多钟D.10分钟参考答案：C19.设a=3，b=5，则以下表达式值为真的是()。A.(ab) or (b0)B.a=b And b10C.(a0)D.(-3=5a) And (b0)参考答案：A20.以下能判断是否到达文件尾的函数是()。A.BOFB.LOCC.LOFD.EOF参考答案：D21.列表框和组合框主要的不同在于前者能选择多个项目，后者不能。()A.正确B.错误参考答案：B22.在窗体上有一

10、个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1_() TxtTime.text=Time End Sub 在横线上应填入的内容是()。A.VisibleB.TimerC.IntervalD.Enabled参考答案：B23.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程 Private Sub Command1_Click() n=Text1，Text Select Case n Case 1 To 20 x=10

11、Case 2，4，6 x=20 Case IsA.40B.30C.20D.10参考答案：D24.下列哪个属性设置文本框中文字的对齐方式()。A.SelLengthB.ScrollBarsC.MultilineD.Alignment参考答案：D25.设组合框Combo1中有3个项目，则以下能删除最后一项的语句是()。A.Combo1.RemoveItem TextB.Combo1.RemoveItem 2C.Combo1.RemoveItem 3D.Combo1.RemoveItem Combo1.Listcount参考答案：B26.在窗体上画一个名称为Command1的命令按钮和两个名称分别为

12、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 IsA.40B.30C.20D.10参考答案：D27.当一个工程含有多个窗体时，其中的启动窗体是()。A.第一个添加的窗体B.最后一个添加的窗体工程属性C.在“工程属性”对话框中指定的窗体D.启动Vosual Basic时建立的窗体参考答案：C28.设a=10，b=5，c=1，执行语句Print abc后，窗体上显示的是()。A.TrueB

13、.FalseC.1D.出错信息参考答案：B29.以下能判断指针是否指向文件尾的函数是()。A.BOFB.LOCC.LOFD.EOF参考答案：D30.目录列表框的Path属性的作用是()。A.显示当前驱动器或指定驱动器上某文件夹的路径B.显示当前驱动器或指定驱动器上的某目录下的文件名C.显示根目录下的文件名D.只显示当前路径下的文件参考答案：A31.设a=10,b=5,c=1,执行语句Print abc后，窗体上显示的是()。A.出错信息B.TrueC.FalseD.1参考答案：C32.在Visual Basic 6.0中，改变控制的位置可以通过设置()属性来实现。A.Width和TopB.Wi

14、dth和HeightC.Left和TopD.Left和Height参考答案：C33.用下面语句定义的数组，其元素个数是()。 Dim A (-3 To 5) As IntegerA.9B.8C.7D.6参考答案：A34.设有语句：x=InputBox(“输入数值”，“0”，“示例”)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是()。A.在box对话框标题栏中显示的是“示例”B.变量x的值是数值10C.变量x的值是字符串“10”D.0是默认值参考答案：C35.在下列动作中，不能引发命令按钮Click事件的是()。A.把焦点转移到按钮上，然后按回车B.如果按钮有快捷字母键，

15、按Alt+快捷字母键C.在按钮上单击鼠标左键D.在按钮上单击鼠标右键参考答案：D36.在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Clic() 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.4321B.34C.1234D.12参考答案：C37.以下声明语句中错误的是()。A.Const var1

16、=123B.Dim var2=ABCC.Public a，b as integerD.Static a as single参考答案：B38.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是()。A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口参考答案：C39.VB集成开发环境有三种工作状态，不属于三种工作状态之一的是()。A.设计状态B.编写代码状态C.运行状态D.中断状态参考答案：B40.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()Dim a As Integer，s As Integer a

17、=8 s=1 Do s= s a a=a-1 Loop While aA.7 9B.34 0C.9 7D.死循环参考答案：C41.执行语句：Open“Tel.dat” For Random As#1 Len=50后，对文件Tel.dat中的数据能够执行的操作是()。A.既可以读，也可以写B.只能读，不能写C.只能写，不能读D.不能读，不能写参考答案：A42.下列哪个属性设置文本框中文字的对齐方式?()A.SelLengthB.AlignmentC.MultilineD.ScrollBars参考答案：B43.在VB中，工程文件的扩展名是()。A.frmB.vbpC.basD.frx参考答案：B4

18、4.设在菜单编辑器中定义了一个菜单项，名为Menu1,为了在运行时隐藏该菜单项应使用的语句是()。A.Menu1.Visible=TrueB.Menu1.Visible=FalseC.Menu1.Enabled=TrueD.Menu1.Enabled=False参考答案：B45.下列属性中哪个不是图片框的属性()。A.StretchB.PictureC.AutoRedrawD.Align参考答案：A46.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是()。A.StretchB.AutosizeC.AutoredrawD.Appearance参考答案：A47.随机文件是因为()。A.文件中的内容是通过随机数产生的B.文件中的记录号通过随机数产生的C.可对文件中的记录根据记录号随机地读/写D.文件的每条记录的长度是随机的参考答案：C48.以下选项中，不是VB标准控件的是()。A.命令按钮B.定时器C.通用对话框D.单选框参考答案：C49.要使一个文本框对象能够显示多行文字，应设置该对象的()属性值为True。A.TextB.MultiLineC.StyleD.Visible参考答案：B50.程序流程是指在一个程序中语句的执行次序。()A.正确B.错误参考答案：A