东大19春学期《可视化程序设计Ⅰ》在线作业2辅导答案

《东大19春学期《可视化程序设计Ⅰ》在线作业2辅导答案》由会员分享，可在线阅读，更多相关《东大19春学期《可视化程序设计Ⅰ》在线作业2辅导答案（5页珍藏版）》请在金锄头文库上搜索。

1、东大19春学期可视化程序设计在线作业2 一、单选题共20题，100分1、设a=3,b=5，则以下表达式值为真的是Aa=b And b10B(ab)Or(b0)C(a0)D(-3+5a)And(b0)【东北大学】本题选择：B2、假定窗体上有一个文本框，名为Txt1，为了使该文本框的内容能够换行，并且具有水平的垂直滚动条，正确的属性设置为（ ）ATxt1.MultiLine = True : Txt1.ScrollBars = 0BTxt1.MultiLine = True : Txt1.ScrollBars = 3CTxt1.MultiLine = False: Txt1.ScrollBars

2、= 0DTxt1.MultiLine = False Txt1.ScrollBars = 3【东北大学】本题选择：B3、下列不能打开菜单编辑器的操作是A按Ctrl+EB单击工具栏中的“菜单编辑器”按钮C执行“工具”菜单中的“菜单编辑器”命令D按Shift + Alt + M【东北大学】本题选择：D4、以下关于图片框控件的说法中，错误的是A可以通过Print方法在图片框中输出文本B清空图片框控件中图形的方法之一是加载一个空图形C图片框控件可以作为容器使用D用Stretch属性可以自动调整图片框中图形的大小【东北大学】本题选择：D5、可以惟一标识控件数组中的每一个控件属性的是ANameBCapti

3、onCIndexDEnabled【东北大学】本题选择：C6、下列可以打开立即窗口的操作是ACtrl+DBCtrl+ECCtrl+FDCtrl+G【东北大学】本题选择：D7、阅读程序：Sub subP(b() As Integer)For i =1 To 4b(i)=2*i Next iEnd Sub Private Sub Commandl_Click()Dim a(1 To 4)As Integera (1)=5a (2)=6a (3)=7a (4)=8subP a ()For i =1 To 4Print a(i)Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为()A2

4、4 6 8B5 6 7 8C 10 12 14 16D出错【东北大学】本题选择：A8、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i=1 To 4x=4For j =1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是A7B15C157D538【东北大学】本题选择：B9、刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是A单选按钮B图片框C通用对话框D文本框【东北大学】本题选择：C10、阅读程序：Function F(a A

5、s Integer)b = 0Static cb = b+1c = c+1f = a+b+cEnd Function Private Sub Commandl_Click ()Dim a As Integera =2For i =1 To 3Print F(a)Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为A4 4 4B4 5 6C4 6 8D4 7 9【东北大学】本题选择：B11、(5)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500，500 End Sub 程序运行后，单击

6、命令按钮，执行的操作为A命令按钮移动到距窗体左边界、上边界各500的位置B窗体移动到距屏幕左边界、上边界各500的位置C命令按钮向左、上方向各移动500D窗体向左、上方向各移动500【东北大学】本题选择：B12、在窗体上面一个命令按钮（其Name属性为Commandl），然后编写如下代码：Option Base 1Private Sub Commandl_Click( )Dim a(4,4)For i =1 To 4For j =1 To 4a(i,j) = (i-1)*3+jNext jNext iFor i =3 To 4For j =3 To 4Print a(j,i);Next jPr

7、intNext iEnd Sub程序运行后，单击命令按钮，其输出结果为A6 9 7 10B7 10 8 11C8 11 9 12D9 12 10 13【东北大学】本题选择：D13、关于MDI窗体不正确描述的是A所有子窗体均在MDI窗体工作区，可进行排列B所有子窗体的大小和位置均可以调整，并且可以移动出MDI窗体工作区C所有子窗体最小化后，其图标显示在MDI窗体工作区，而不是状态栏DMDI窗体和子窗体均可以有自己的菜单【东北大学】本题选择：B14、假定窗体上有一个标签，名为Labell，为了使该标签透明并且没有边框，则正确的属性设置为ALabel1. BackStyle=0Label1.Bord

8、erstyle=0BLabel1.BackStyle=1Label1.Borderstyle=1CLabel1.BackStyle=TrueLabel1.BorderStyle=TrueDLabel1.BackStyle=FalseLabel1.Borderstyle=False【东北大学】本题选择：A15、在窗体中添加一个通用对话框，其名称为CommonDialog1，然后添加一个命令按钮。要求单击命令按钮时，打开一个打开文件的通用对话框。该窗口的标题为“打开”，在文件类型框中显示的是TextFiles(*.txt)。则能够满足上述要求的程序是（ ）APrivate Sub Command1

9、_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = allfiles(*.*)|*.*|textfiles & (*.txt)|*.txt|Batchfiles(*.bat)|*.batCommonDialog1.FilterIndex = 1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd SubBPrivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommon

10、Dialog1.Filter = allfiles(*.*)|*.*|textfiles & (*.txt)|*.txt|Batchfiles(*.bat)|*.batCommonDialog1.FilterIndex = 2CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd SubCPrivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = allfiles(*.*)|*.*|textfiles & (*.txt)

11、|*.txt|Batchfiles(*.bat)|*.batCommonDialog1.FilterIndex =1CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd SubDPrivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = allfiles(*.*)|*.*|textfiles & (*.txt)|*.txt|Batchfiles(*.bat)|*.batCommonDialog1.FilterIndex

12、 = 2CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd Sub【东北大学】本题选择：B16、为使计时器控件每隔5秒钟产生一个计时器事件（Timer事件），则应将其Interval属性值设置为（ ）A5B500C300D5000【东北大学】本题选择：D17、在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x窗体上有

13、一组合框Combo1，并将下列项“Chardonnay”、“FunBlanc”、“Gewrzt”和“Zinfande”放置到组合框中，当窗体加载时的代码如下：Private Sub Form_Load()Combo1.AddItAText1.Text=Combo1.List(0)BText1.Text=Combo1.List(1)CText1.Text=Combo1.List(2)DText1.Text=Combo1.List(3)【东北大学】本题选择：B18、在当前窗体中已经添加一公共对话框commonDialog1 ，实现打开文件保存对话框的语句AcommonDialog1.showsav

14、eBcommonDialog1.action=3CcommonDialog1.showopenDlcommonDialog1.action=1【东北大学】本题选择：A19、当利用Line方法进行添加图时，以下正确的说法是（ ）A有7种不同的线型，而且不管线宽多少都可以绘制虚线/点划线/点线B使用Line(100,100)-(1000,1200)和Line(100,100)-Step(900,1100)将绘制两条相同位置的直线 C可利用Line方法添加矩形，如Line(300,300)-(2000,2000),BF D可利用Line方法添加矩形，如Line(300,300)-(2300,2300

15、),B+F 【东北大学】本题选择：C20、在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“Save”，缺省文件名为“Savefile”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是APrivate Sub Command1_Click()CommonDialog1.FileName=SaveFileCommonDialog1.Filter=All Files|*.*|(*.txt)|*.txt|(*.doc)|*.docCommonDialog1.FilterIndex=2CommonDialog1.DialogTitle=SaveCommonDialog1.Action=2End SubBPrivate Sub Command1_Click()CommonDialog1.FileName=