首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立随机文件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
25
问题
建立随机文件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://jikaoti.com/ti/ZF80FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列有关数据库的描述,正确的是()。
给出下列的代码则以下哪个选项返回true?Strings="hello";Strings="hello";charc[]={’h’,’e’,’l’,’o’};
将E-R图转换到关系模式时,实体与联系都可以表示成
数据独立性是数据库技术的重要特点之一。所谓数据独立性是指
关于文件名的处理中,测试当前文件是否目录用【】函数。
数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可以不变,所以,基于逻辑结构的应用程序不必修改,称为【】。
下列不属于Java的图形用户界面内容的包是
设有下列两个类的定义,则类Person和类Man的关系是()。classPerson{longid://身份证号Stfingname;//姓名}classManextendsPerson{i
能将程序补充完整的选项是classPerson{privateinta;publicintchange(intm){returnm;}}publicclassTeacherex
阅读下面实现堆栈类并发控制的部分代码publicclassDataStack{privateintidx=0;privateint[]data=newint[
随机试题
某甲幼年丧母,由其父抚养长大。后其父再婚。某甲与其继母乙格格不入,造成父子关系也较紧张。后因矛盾激化,甲与其父立据宣布脱离父子关系。几年后,甲父死亡,临终留下遗书:将其存款平均分给甲、妻乙及其与乙所生的儿子丙。但在执行遗嘱时,乙阻止将存款的1/3分给甲,声
框移突变与遗传密码的下列哪项特性有关?
符合朗伯比尔定律的有色溶液稀释时,其最大吸收峰的波长位置改变是A.不移动,但峰高值降低B.不移动,但峰高值增大C.向长波长方向移动,且峰高值增大D.向短波长方向移动,且峰高值降低E.向短波长方向移动,峰高值降低
A.人工呼吸、胸部按压B.建立静脉通路,给予药物治疗C.电除颤D.人工心脏起搏E.气管插管心脏复苏后出现心搏停顿或严重心动过缓,最好的治疗方法是
用一定的开采工艺,按一定的开采顺序,剥离岩石、采出矿石的方法是()。
Theenvironmentalandsocialcostsofclosingandrehabilitating(恢复)oldandabandonedminesaroundtheworldarelikelyintril
某人设计了如下程序用于计算并输出7!(7的阶乘)PrivateSUbCommand1_Click()t=0Fork=7To2Step-1t=t*kNextPritetEnd
Noverysatisfactoryaccountofthemechanismthatcausedtheformationoftheoceanbasinshasyetbeengiven.Thetraditional
A--letterofintroductionB--masstourismC--ink-and-washpaintingD--travelagencyE--hospitalityindustryF--ma
Natural-gasVehiclesKermittheFrogoncesaid,"It’snotthateasybein’green."Althoughhewasn’treferringtocars,his
最新回复
(
0
)