奥鹏易百

 找回密码
 立即注册

扫一扫,访问微社区

QQ登录

只需一步,快速开始

帮助中心知识拓展客服QQ 515224986
查看: 290|回复: 0

东北大学18秋学期《可视化程序设计Ⅰ》在线作业1

[复制链接]

1万

主题

2

回帖

2万

积分

论坛元老

积分
29240
发表于 2018-9-15 16:59:13 | 显示全部楼层 |阅读模式
扫码加微信
18秋学期《可视化程序设计Ⅰ》在线作业1

东北大学作业答案

一、单选题:
1.[单选题]设a=“VisualBasic”,下面使b=“Basic”的语句是          (满分:)
    A. \b=Left(a,8,12)\
    B. \b=Mid(a,8,5)\
    C. \b=Rigth(a,5,5)\
    D. \b=Left(a,8,5)\]
    正确答案:——B——
2.[单选题]在一行内写多条语句时,语句之间要用某个符号分隔。这个符号是()          (满分:)
    A. \,\
    B. ;
    C. 、
    D. :]
    正确答案:——D——
3.[单选题]执行下面的语句后,所产生的信息框的标题是()a=MsgBox(\AAAA\,\BBBB\,\\,5)          (满分:)
    A. BBBB
    B. 空
    C. AAAA
    D. 出错,不能产生信息框]
    正确答案:——D——
4.[单选题]假定窗体上有一个Text1文本框,为使它的文本内容位于中间并且没有边框,则正确的属性设置为          (满分:)
    A. Text1.Alignment=1:Text1.BorderStyle=0
    B. Text1.Alignment=2:Text1.BorderStyle=1
    C. Text1.Alignment=1:Text1.BorderStyle=1
    D. Text1.Alignment=2:Text1.BorderStyle=0]
    正确答案:————
5.[单选题]以下语句的输出结果是。PrintFormat$(32548.5,“000,000.00”)          (满分:)
    A. 32548.5
    B. "32,548.5"
    C. "032,548.50"
    D. "32,548.50"]
    正确答案:————
6.[单选题]有如下语句:Open“f1.dat”ForRandomAs#1Len=15,表示文件f1.dat每个记录的长度等于()          (满分:)
    A. 15个字符
    B. 15个字节
    C. 或小于15个字符
    D. 或小于15个字节]
    正确答案:————
7.[单选题]以下关于图片框控件的说法中,错误的是          (满分:)
    A. 可以通过Print方法在图片框中输出文本
    B. 清空图片框控件中图形的方法之一是加载一个空图形    奥鹏易百答案

    C. 图片框控件可以作为容器使用
    D. 用Stretch属性可以自动调整图片框中图形的大小]
    正确答案:————
8.[单选题]以下能判断是否到达文件尾的函数是          (满分:)
    A. BOF
    B. LOC
    C. LOF
    D. EOF]
    正确答案:————
9.[单选题]以下叙述中错误的是          (满分:)
    A. 一个工程可以包括多种类型的文件
    B. VisualBasic应用程序既能以编译方式执行,也能以解释方式执行
    C. 程序运行后,在内存中只能驻留一个窗体
    D. 对于事件驱动型应用程序,每次运行时的执行顺序可以不一样]
    正确答案:————
10.[单选题]阅读程序:SubsubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommandl_Click()Dima(1To4)AsIntegera(1)=5a(2)=6a(3)=7a(4)=8subPa()Fori=1To4Printa(i)NextiEndSub运行上面的程序,单击命令按钮,输出结果为          (满分:)
    A. 2468
    B. 5678
    C. 10121416]
    正确答案:————
11.[单选题]VB中工程文件的扩展名为          (满分:)
    A. vbp
    B. frm
    C. ds
    D. bas]
    正确答案:————
12.[单选题]关于MDI窗体不正确描述的是          (满分:)
    A. 所有子窗体均在MDI窗体工作区,可进行排列
    B. 所有子窗体的大小和位置均可以调整,并且可以移动出MDI窗体工作区
    C. 所有子窗体最小化后,其图标显示在MDI窗体工作区,而不是状态栏
    D. MDI窗体和子窗体均可以有自己的菜单]
    正确答案:————
13.[单选题]在窗体中添加一个通用对话框,其名称为CommonDialog1,然后添加一个命令按钮。要求单击命令按钮时,打开一个打开文件的通用对话框。该窗口的标题为“打开”,在文件类型框中显示的是TextFiles(*.txt)。则能够满足上述要求的程序是()          (满分:)
    A. \PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReadOnlyCommonDialog1.Filter=\\allfiles(*.*)|*.*|textfiles\\&\\(*.txt)|*.txt|Batchfiles(*.bat)|*.bat\\CommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBoxCommonDialog1.FileNameEndSub\
    B. \PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReadOnlyCommonDialog1.Filter=\\allfiles(*.*)|*.*|textfiles\\&\\(*.txt)|*.txt|Batchfiles(*.bat)|*.bat\\CommonDialog1.FilterIndex=2CommonDialog1.ShowOpenMsgBoxCommonDialog1.FileNameEndSub\
    C. \PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReadOnlyCommonDialog1.Filter=\\allfiles(*.*)|*.*|textfiles\\&\\(*.txt)|*.txt|Batchfiles(*.bat)|*.bat\\CommonDialog1.FilterIndex=1CommonDialog1.ShowSaveMsgBoxCommonDialog1.FileNameEndSub\
    D. \PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReadOnlyCommonDialog1.Filter=\\allfiles(*.*)|*.*|textfiles\\&\\(*.txt)|*.txt|Batchfiles(*.bat)|*.bat\\CommonDialog1.FilterIndex=2CommonDialog1.ShowSaveMsgBoxCommonDialog1.FileNameEndSub\]
    正确答案:————
14.[单选题]阅读程序:SubsubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommandl_Click()Dima(1To4)AsIntegera(1)=5a(2)=6a(3)=7a(4)=8subPa()Fori=1To4Printa(i)NextiEndSub运行上面的程序,单击命令按钮,输出结果为()          (满分:)
    A. 2468
    B. 5678
    C. 10121416
    D. 出错]
    正确答案:————
15.[单选题]在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为          (满分:)
    A. A)Fori=0ToList1.ListCount-1……
    B. B)Fori=0ToListCount-1……Next
    C. C)Fori=1ToList1.listCount……Next
    D. D)Fori=1ToListCount……Next]
    正确答案:————
16.[单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程PrivateSubCommand1_Click()StaticbAsVariantb=Array(1,3,5,7,9)……EndSub此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是          (满分:)
    A. Fori=0to5-1\\2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext\
    B. \Fori=0to5tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext\
    C. \Fori=0to5\\2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext\
    D. \Fori=0to5\\2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext\]
    正确答案:————
17.[单选题]当一个工程含有多个窗体时,其中的启动窗体是          (满分:)
    A. 启动VB时建立的窗体
    B. 第一个添加的窗体
    C. 最后一个添加的窗体工程属性
    D. 在工程属性对话框中指定的窗体]
    正确答案:————
18.[单选题]对窗体编写如下代码:OptionBase1PrivateSubForm_KeyPress(KeyAsciiAsInteger)a=Array(237,126,87,48,498)m1=a(1)m2=1IfKeyAscii=13ThenFori=2To5Ifa(i)>mlThenm1=a(j)m2=iEndIfNextiEndIfPrintm1Printm2EndSub程序运行后,按回车键,输出结果为          (满分:)
    A. 484
    B. 2371
    C. 4985
    D. 4984]
    正确答案:————
19.[单选题]假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:PrivateTypeanimalAnimalNameAsString*20AColorAsString*10EndType在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimrecAsanimalOpen\c:\\vbTest.dat\ForRandomAs#1Len=Len(rec)rec.animalName=\C          (满分:)
    A. 记录类型animal不能在Form1中定义,必须在标准模块中定义
    B. 如果文件c:\\vbTest.dat不存在,则Open命令执行失败
    C. 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
    D. \语句“Put#1,,rec”将animal类型的两个数据元素写到文件中\]
    正确答案:————
20.[单选题](10)为了把窗体上某个控件变成活动控件,应执行的操作是()          (满分:)
    A. 单击窗体的边框
    B. 单击控件的内部
    C. 双击控件
    D. \双击窗体]
    正确答案:————

奥鹏作业答案
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|www.openhelp100.com ( 冀ICP备19026749号-1 )

GMT+8, 2024-5-19 21:32

Powered by openhelp100 X3.5

Copyright © 2001-2024 5u.studio.

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