首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立随机文件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
30
问题
建立随机文件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全国计算机二级
相关试题推荐
在Java源文件中什么类最多只能有一个,其他类的个数不限?
程序设计语言的基本成分是数据成分、运算成分、控制成分和
下列程序中,要求计算1+2+3+…+100的值,并显示计算结果。请将程序补充完整。程序运行结果如下:5050源程序代码文件清单如下:publicclassex20_1{publicstaticvoidma
数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可以不变,所以,基于逻辑结构的应用程序不必修改,称为【】。
对象是一组相关变量和相关方法的封装体,是类的一个_________。
下列for循环语句的执行次数是()。for(intx=0,y=0;(y!=0)&&(X<4);x++)
下列数据结构中,能用二分法进行查找的是
一般来说,数据库的设计过程要经历3个大的阶段,即可行性分析与研究阶段、系统设计阶段、设计实施与系统运行阶段。概念设计、逻辑结构设计、物理结构设计属于数据库设计的【】阶段。
______类是所有类的根,它所包含的属性和方法被所有类继承。()
多线程是Java语言的 【】 机制,只能够处理同步共享数据和各种不同的事件。
随机试题
A.窦房结P细胞B.窦房结过渡细胞C.房室交界细胞D.浦肯野细胞E.心室肌细胞自律性最高的心肌细胞是
吗啡作用于边缘系统及蓝斑核的阿片受体,引起吗啡作用于延脑孤束核的阿片受体,引起
患者,女,32岁。在得知自己被确诊为乳腺癌早期时,忍不住躺在病床上失声痛哭。这时护士问:“你现在觉得怎么样?”但患者一直低头不语,不愿意和护士沟通。之后的几天内,患者情绪很低落,常为一些小事伤心哭泣。当患者因沮丧而哭泣时,护士不恰当的沟通行为是(
1997年7月1日,我国恢复对香港行使主权。作为我国的单独关税区,香港不适用以下哪些法律、国际公约和国际惯例?()
甲公司签发一张支票给乙公司,保证人为丙公司,乙公司将其背书转让给丁公司,则可以行使付款请求权的为乙公司和丁公司。()
汉地佛教寺院造像组合中,“华严三圣”指的是()。
Thecohesiveness(内聚力)ofafamilyseemstorelyonmemberssharingcertainroutinepracticesandevents.Foragrowingshareoft
【S1】【S9】
Whoismostlikelygivingthetalk?
PromotelearningandskillsforyoungpeopleandadultsEducationisaboutgivingpeopletheopportunitytodeveloptheirpo
最新回复
(
0
)