首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d:\stu1.dat中,然后从文件中读出第3个人的学号、姓名和英语成绩并显示在窗体中。 Type student No As Long Name As Stri
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d:\stu1.dat中,然后从文件中读出第3个人的学号、姓名和英语成绩并显示在窗体中。 Type student No As Long Name As Stri
admin
2010-09-11
82
问题
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d:\stu1.dat中,然后从文件中读出第3个人的学号、姓名和英语成绩并显示在窗体中。
Type student
No As Long
Name As String * 20
English As Integer
End Type
Private Sub form_ Click ()
Dim k As student, i As Integer
【 】
Open "d:\stu1. dat" for Random As #10 Len = Reclen
for i = 1 To 5
k. No= InputBox(“请输入学号”)
k. Name = InputBox (“请输入姓名”)
k. English= InputBox (“请输入英语成绩”)
【 】
Next i
【 】
Print k. No; k. Name; k. English
Close #10
End Sub
选项
答案
Reclen=Len(k),Put #10 i,k,Get #10,3,k
解析
本题中定义了一个记录类型Student,并通过一个循环读入5条记录型数据存放到指定的文件中去,因此文件的存取方法应是随机存取方式。从打开文件的Open语句可以看到有一个变量RecLen应是写入文件中的记录长度,在该语句的前面应给该变量赋值,故[8]处应填“Reclen= Len(k)”。在循环中每读入一个记录型的变量值,应立即把该变量写到文件中去,应使用Put语句,故在[9]处应填“Put #10,i,k”。要读出随机文件中的某条记录,可使用Get语句,故在[10]处应填“Get #10,3,k”。
转载请注明原文地址:https://kaotiyun.com/show/wNmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面对对象概念描述错误的是( )。
设一棵二叉树中有3个叶子结点,有8个度为1的结点,则该二叉树中总的结点数为______。
下列程序段运行的结果为publicclassTest{staticvoidprint(Strings,inti){System.out.println("String:"+s+",int:"+i);
下列选项中合法的Java语言赋值语句是( )。
对下列二叉树进行中序遍历的结果是( )。
下面关于Applet的说法中,正确的是______。
下列叙述中,正确的是______。
“商品”与“顾客”两个实体集之间的关系一般是
下列概念中不包括任何实现,与存储空间没有任何关系的是
当使用Threadt=newThread(r)创建一个线程时,表达式:rinstanceofThread的值是______。
随机试题
下列关于肝门静脉的叙述,正确的是()
新生儿娩出1min时心率96/min,呼吸正常,四肢活动好,弹足底能皱眉,躯体肤红,四肢青紫。Apgar评分可评为
男,25岁,1周前右足底被铁钉刺伤,未作清创处理。近日,感头痛、咬肌紧张酸胀,诊断为破伤风,其发病机制中错误的是
患者,男,55岁。急性胆囊炎,全麻下行胆囊切除术,术毕入麻醉恢复室,1小时后拔管,之后出现呼吸急促,颜面潮红,神志逐渐淡漠。最先考虑的原因是
设A是m×n的非零矩阵,B是n×l非零矩阵,满足AB=0,以下选项中不一定成立的是()。
合同争议的解决方式有()。
甲公司2018年6月13日销售一批商品给乙公司,甲公司开具的增值税专用发票注明的价款100万元,增值税17万元。同时销售合同中规定现金折扣条件为:2/10,1/20,N/30(假定计算现金折扣时不考虑增值税),乙公司存6月20日支付了上述货款。下列各项表述
根据《证券法》的规定,向不特定对象公开发行的股票票面总值超过一定数额的,应当由承销团承销,该数额为()。
K注册会计师计划测试M公司2007年度主营业务收入的完整性。以下各项审计程序中,通常难以实现上述目标的是( )。K注册会计师在审计坏账准备时注意到以下事项,其中,正确的是( )。
一棵二叉树的繁茂度定义为R层结点数的最大值与树的高度的乘积。编写一个算法求二叉树的繁茂度。
最新回复
(
0
)