二级VB笔试分类练习题 数据文件.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文档。上传文档
查看更多
16.3 实战练习 一、选择题 1.以下叙述中不正确的是______ 。 A.顺序文件结构简单 B.存储在顺序存取文件中的记录不允许任意存取 C.能同时对顺序文件进行读写操作 D.顺序文件的数据以字符(ASCII码的形式存储) 2.要在D盘的Temp 目录下建立一个名为Name.dat 的顺序文件,应使用______ 语句。 A. Open Name. dat For Output As #1 B. Open Name. dat For Input As #1 C. Open D:\Temp\Name.dat For InputAs #1 D. Open D:\Temp\Name.dat For Output As #1 3.用来设置文件中下一个读写位置的语句是______ 。 A.Skip B.Seek C.FileAttr D.Select 4.下列语句中______ 是顺序文件操作和随机文件操作中都有的。 A.Print B.Get C.Put D.Close 5.要向Data.dat 文件中添加数据,下面语句中正确的是______ 。 A. Open Data.dat For OutputAs #1 B. Open Data.daf For InputAs #1 C. Open Data.dat For OutputAs #I D. Open Data.dar For Append As #1 6.在用Open 语句打开文件时,如果省略了“For 方式”,则打开文件的存取方式是 ______ 。 A.顺序输入方式 B.随机存取方式 C.二进制方式 D.顺序存取方式 7.下列文件函数中,作用为以整数形式返回Open 语句可以使用的下一个有效的文件号的是______ 。 A.Lof B.FileAttr C.FreeFile D.FileLen 8.当发生Form_ Click 事件后,下面这段程序代码的执行结果为在窗体中输出______ 。 Option Explicit Private Sub Form Click () Dim num As String * 1, n As Integer Open C:\ Check. txt For Random As #10 For n = 1 To 6 num = Chr(n + 64) Put %10, n, num Next n Seek #10, 3: Get #10, , num Print Loc(10); Seek(10) End Sub A.3 4 B.4 5 C. 5 3 D. 3 3 9.判断是否到达文件尾和返回文件字节数的函数是______ 。 A.EOF END B.END CLOSE C.EOF LOF D.END LOF 10.在窗体上画一个名称为CommonDialog1的通用对话框和一个名为Command1的命令按钮。要求实现这样一个功能:单击命令按钮后,打开一个通用对话框用于保存文件,其窗口标题为“保存”,默认文件名为Data,在“文件类型”栏中显示*.txt。下列程序中能实现以上功能的是______ 。 A. Private Sub Command1_ Click() CommonDialog1. FileName = Data CommonDialog1. Filter = All Files|*.|* |(*.txt)|(*.doc)|*.doc CommonDialog1. Filterlndex = 2 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 2 End Sub B. Private Sub Command1_ Click() CommonDialog1. FileName = Data CommonDialog1. Filter = All Files|*.*|(*.txt)|(*.doc)|*.doc CommonDialog1. FilterIndex = 2 CommonDialog1.

文档评论(0)

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

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

1亿VIP精品文档

相关文档