电子科技大学22春“计算机应用技术”《VB程序设计》在线作业一含答案参考4

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

1、书山有路勤为径，学海无涯苦作舟！ 住在富人区的她电子科技大学22春“计算机应用技术”VB程序设计在线作业一含答案参考一.综合考核(共30题)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.456B.246C.1

2、23123D.123参考答案：B2.程序流程是指在一个程序中语句的执行次序。()A.正确B.错误参考答案：A3.事件可以由用户引发，也可以由系统引发。()A.正确B.错误参考答案：A4.在窗体上画一个命令按钮(其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.432

3、1B.34C.1234D.12参考答案：C5.设x=4，y=8，z=7，表达式xA.1B.-1C.TRUED.FALSE参考答案：C6.设在菜单编辑器中定义了一个菜单项，名为Menu1，为了在运行时隐藏该菜单项应使用的语句是()。A.Menu1.Visible=TrueB.Menu1.Visible=FalseC.Menu1.Enabled=TrueD.Menu1.Enabled=False参考答案：B7.用下面语句定义的数组，其元素个数是()。 Dim A( -3 To 5) As IntegerA.9B.8C.7D.6参考答案：A8.在下列动作中，不能引发命令按钮Click事件的是()。A

4、.把焦点转移到按钮上，然后按回车B.如果按钮有快捷字母键，按Alt+快捷字母键C.在按钮上单击鼠标左键D.在按钮上单击鼠标右键参考答案：D9.设在菜单编辑器中定义了一个菜单项，名为Menu1,为了在运行时隐藏该菜单项应使用的语句是()。A.Menu1.Visible=TrueB.Menu1.Visible=FalseC.Menu1.Enabled=TrueD.Menu1.Enabled=False参考答案：B10.在调用“打开”或“保存”文件对话框时，如果需要指定文件列表框列出的文件类型是.doc文件，则正确的描述格式是()。A.CommonDialog1.Filter=“文本文件(.doc)

5、|(*.doc)”B.CommonDialog1.Filter=“text(.doc)|(*.doc)”C.CommonDialog1.Filter=“text(.doc)(*.doc)”D.CommonDialog1.Filter=“*.DOC|*.doc”参考答案：D11.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是()。A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_KeyPress参考答案：A12.在

6、窗体上画一个命令按钮，然后编写如下事件过程：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参考答案：A13.下列哪个属性设置文本框中文字的对齐方式?()A.SelLengthB.AlignmentC.Mul

7、tilineD.ScrollBars参考答案：B14.在窗体上画一个名称为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 IsA.40B.30C.20D.10参考答案：D15.在MDI界面中，当父窗体关闭，子窗体也随之关闭。()A.正确B.错误参考答案：A16.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是()。A.StretchB.A

8、utosizeC.AutoredrawD.Appearance参考答案：A17.设a=10,b=5,c=1,执行语句Print abc后，窗体上显示的是()。A.出错信息B.TrueC.FalseD.1参考答案：C18.一个工程含有多个窗体时，其中的启动窗体是第一个添加的窗体。()A.正确B.错误参考答案：B19.下列哪些方法不属于通用对话框()。A.ShowPrintB.ShowListC.ShowFontD.ShowColor参考答案：B20.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Com

9、mand1_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参考答案：D21.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是()。A.通用对话框B.文本框C.图片框D.单选按钮参考答案：B22.在窗体上有一个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为 Private Sub Timer1 TxtTime.text=Time End Sub 在横线上应填入的内容是(

10、)。A.VisibleB.TimerC.IntervalD.Enabled参考答案：B23.为了使标签能自动调整大小以显示全部文本内容，应把标签的Autosize属性设置为true。()A.正确B.错误参考答案：A24.执行语句：Open Tel.dat For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是()。A.既可以读，也可以写B.只能读，不能写C.只能写，不能读D.不能读，不能写参考答案：A25.标签的默认属性是Caption属性。()A.正确B.错误参考答案：A26.以下选项中，不是VB标准控件的是()。A.命令按钮B.定时器C.通用对话框D

11、.单选框参考答案：C27.设a=10，b=5，c=1，执行语句Print abc后，窗体上显示的是()。A.TrueB.FalseC.1D.出错信息参考答案：B28.在窗体上有一个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1_() TxtTime.text=Time End Sub 在横线上应填入的内容是()。A.VisibleB.TimerC.IntervalD.Enabled参考答案：B29.当一个工程含有多个窗体时，其中的启动窗体是()。A.第一个添加的窗体B.最后一个添加的窗体工程属性C.在“工程属性”对话框中指定的窗体D.启动Vosual Basic时建立的窗体参考答案：C30.下面()数写成普通的十进制数是2.567E-2。A.0.0002567B.0.02567C.0.002567D.0.00002567参考答案：B