VB第7章习题及答案.docVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VB第7章习题及答案

习题七及答案 习 题 七 1. 单项选择题 (1) 根据数据的存取方式和结构,文件可以分为( )。 A) 顺序文件和随机文件 B) 程序文件和数据文件 C) ASCII文件和二进制文件 D) 文本文件和二进制文件 (2) 下列叙述不正确的是( )。 A) 打开一个文件后,才能对其进行读写操作 B) Open语句兼有打开文件和新建文件的功能 C) 当用Open语句打开一个已经打开的文件时,将出现错误信息 D) 用Open语句以顺序输入的方式打开一个不存在的文件时,将建立该文件 (3) 以下能判断是否到达文件尾的函数是( )。 A) BOF B) LOC C) LOF D) EOF (4) 下面关于顺序文件的描述正确的是( )。 A)每条记录的长度必须相同 B)可通过编程对文件中的某条记录方便地修改 C)数据只能以ASCII码形式存放在文件中,所以可通过文本编辑软件显示 D)文件的组织结构复杂 (5) 能对顺序文件进行输出操作的语句是( )。 A) Put B) Get C) Write D) Read (6) 下列叙述错误的是( )。 A) 文件是实现程序和数据分离的重要方式 B) 按文件的性质分类, 可将文件分为ASCII文件和二进制文件 C) 文件的存取方式有顺序文件和随机文件两种 D) 文件的逻辑结构通常有记录文件和流式文件两种形式 (7) 目录列表框的Path属性的作用是( )。 A) 显示当前驱动器或指定驱动器上的路径 B) 显示当前驱动器或指定驱动器上的某目录下的文件名 C) 显示根目录下的文件名 D) 只显示当前路径下的文件 (8) 执行语句OpenTel.datFor Random As #1 Len=50后,对文件Tel.dat中的数据能够执行的操作是( )。 A) 只能写,不能读 B) 只能读,不能写 C) 既可以读,也可以写 D) 不能读,不能写 (9) 下面关于随机文件的描述不正确的是( )。 A)每条记录的长度必须相同 B)一个文件中记录号不必惟一 C)可通过编程对文件中的某条记录方便地修改 D)文件的组织结构比顺序文件复杂 (10) 文件号最大可取的值为( )。 A) 255 B) 511 C) 512 D) 256 (11) PRINT #1,STR1 $中的PRINT是( )。 A)文件的写语句 B)在窗体上显示的方法 C)子程序名 D)以上均不是 (12) 为了建立一个随机文件,其中每一条记录由多个不同数据类型的数据项组成,应使用( )。 A)记录类型 B)数组 C)字符串类型 D)变体类型 (13) 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2,标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Label1中显示当前文件夹中文件的数量。如图7-14所示。 图7-14 (9)题的运行界面 能够正确实现上述功能的程序是( )。 A) Private Sub Dir1_Change() B) Private Sub Dir1_Change() File1.Path=Dir1.Path File1.Path=Dir1.Path End Sub End Sub Private Sub Drive1_Change() Private Sub Drive1_Change() Dir.Path=Drive1.Drive Dir1.Path=Drive1.Drive Label1.Caption=File1.ListCount Label1.Caption=File1.List End Sub End Sub C) Private Sub Dir1_Change() D) Private Sub Dir1_Change() File1.Path=Dir1.Path File1.Path=Dir1.Path Label1.Caption=File1.ListCount Label1.

文档评论(0)

82393aa + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档