首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立随机文件F1.DAT,存放职工姓名和编号,然后把该文件中数据读出显示。请在【 】和【 】处将程序补充完整。 Type worker name As String*10 pay As Single
建立随机文件F1.DAT,存放职工姓名和编号,然后把该文件中数据读出显示。请在【 】和【 】处将程序补充完整。 Type worker name As String*10 pay As Single
admin
2009-02-13
49
问题
建立随机文件F1.DAT,存放职工姓名和编号,然后把该文件中数据读出显示。请在【 】和【 】处将程序补充完整。
Type worker
name As String*10
pay As Single
End Type
Dim workl AS worker
Open"F1.dat"For Random As#1 Len=Len(workl)
Work1.name="LiuMin":work1.pay=400#
【 】
Close#1
Open"F1.dat"For Random As#1 Len=Len(work1)
【 】
Print"work1:",workl.name
Print"work1:",workl.pay
C10se#1
选项
答案
Put#1,1,work1 , Get#1,1,work1
解析
首先用Type函数定义一个记录类型数据worker,然后定义work1变量为work- er。在[14]处,由于要执行写操作,故使用“Put#”语句。“Put#”语句后接三个参数,分别表示文件号、记录号、变量。本题文件打开是文件号设为1,故“Put#”语句后接的文件号也为1,记录号为1,变量为work1,所以[14]处填“Put #l,1,work1”。 由于要执行读操作,故使用“Get#”语句。“Get #”语句后接三个参数,分别表示文件号、记录号、变量。由于这是与上一步“Put#”y语句相反的操作,故参数都一样,分别为 1、1、work1。故[15]处填“Get #1,1,work1”。
转载请注明原文地址:https://www.kaotiyun.com/show/s72p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列()是创建一个标识有“关闭”按钮的语句。
下列有关数据库的描述,正确的是()。
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。
将E-R图转换到关系模式时,实体与联系都可以表示成
执行完语句int[]x=newint[25];后,则下列哪项说法是正确的?
当浏览器重新返回Applet所在页面时,将调用Applet类的方法是
在Java中,用package语句说明一个包时,该包的层次结构必须是
关于文件名的处理中,测试当前文件是否目录用【】函数。
编译JavaApplet源程序文件产生的字节码文件的扩展名为【】。
在面向对象方法中,属性与操作相似的一组对象称为【】。
随机试题
某男,34岁。胃痛隐隐,绵绵不休,喜温喜按,劳累、受凉或空腹时疼痛明显,进食后疼痛缓解,时呕清水,神疲纳少,四肢倦怠,手足不温,大便溏薄,舌淡苔白,脉虚弱。医师诊断为胃痛,证属脾胃虚寒。处方如下:炙黄芪9g,桂枝9g,白芍18g,生姜6g,炙甘草9
抑制DNA合成的抗菌药是
背景资料:某市政公司承包某路段的改建工程,全长2.5km,工期为当年7月~次年2月。该路段为四快两慢主干道,道路结构层:机动车道20cm石灰土底基层,45cm二灰碎石基层,9cm粗粒式、4cm细粒式沥青混凝土面层;非机动车道为20cm石灰土底基层,30c
目前,微机正在向微型化、网络化、多媒体化和智能化方向发展。()
根据相关规定,证券公司召开股东大会,应该于股东大会召开前的( )日刊登召开股东大会的通知。
有20人修一条路,计划15天完成。动工3天后抽出5人植树,留下的人继续修路。如果每人工作的效率不变,那么修完这段公路实际用18天。()
Hisessayis______withmorethan120full-colorphotographsthatdepictthenationalparkinallseasons.
在运行Linux系统的服务器中,使用BIND配置域名服务,主配置文件存放在(31)中。
Walk’nRolltoSchoolDayTheSchoolDistrictofPittsfield,togetherwiththehelpofmanylocalvolunteers,hascoordinatedPi
Nolongerarecontributionstocomputertechnologyconfinedtoanycountry.______isthismoretruethaninEurope.
最新回复
(
0
)