首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为”Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(SmName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为”Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(SmName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2013-10-06
43
问题
在E盘当前目录文件夹下建立一个名为”Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(SmName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As String*1 0
StuAge As Integer
End Type
Private SUb Form_Click( )
Dim S As student
Open”cAstudent.txt”For Random As #1 Len=
Len(s)
For i=1 To 5
s.StuName=InputBox(“请输入姓名”)
s.StuGrade=InputBox(“请输入年级号”)
s.StuAge=Val(InputBox(“请输入年龄”))
Nexti
Close#1
End Sub
选项
A、Print#1,s
B、Print#1,i
C、Put#1,,s
D、Put#1,,i
答案
C
解析
考查文件操作。题目中要求以随机的方式(Random)打开一个文件,打开文件的格式为:Open FileName For Random As#文件号[Len=记录长度],然后以Put命令写入一条记录,格式为:Put[#]文件号,[记录号],变量名。若省略记录号,表示在当前记录号下写入记录型变量,”,”不可以省略。
转载请注明原文地址:https://kaotiyun.com/show/mmQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下不属于标签属性的是______。
若完全二叉树共有n个结点,且从根结点开始,按层序(每层从左到右)用正整数0,1,2,…,n-1从小到大对结点编号,则对于编号为k的结点,错误的是______。
以下叙述中错误的是______。
单击命令按钮后,下列程序代码的执行结果是______。PublicSubfun(aAsInteger,bAsInteger,cAsInteger)Doa=b+cn=n+1LoopWhilen>3EndSub
下列不属于软件工程的3个要素的是______。
以下叙述中正确的是______。
下列______是双精度型变量。
以下程序的功能是,产生10个0~1000之间的随机整数,放入数组Arr中,然后输出其中的最大值。请填空。OptionBase1PrivateSubFormClick()DimArr(10)AsIntegerDimMaxAsIn
函数Int(Rnd(0)*10)的取值范围是______。
当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算。这种情况称为【】。
随机试题
开放式学习有4种类型,分别是学习班形式、______、遥控体系和半合同体系。
案情:某村农民孙甲一家15人于2003年翻盖瓦房9间,共同居住使用。2004年2月全家分家析产以后,孙甲与其两个弟弟孙乙、孙丙各分得3间瓦房,按份共有,分别使用。2004年8月18日孙甲的儿子在本村另外申请到一块宅基地,准备盖一栋楼房,因资金不够,遂决定将
简述爆炸危险环境电气设备选择的原则。
案例十一:表2~10是红日公司2008年7月1日的有关财务信息,假设该公司在7月31日的股价为52元。根据案例十一,回答下列题目:经过非经常损益调整的当前市盈率是( )。
长江全长约6300公里,流经青海、西藏……()个省、自治区、直辖市,流域面积达180余万平方公里:
下列关于网络协议的描述中,错误的是()。
7.8million
Lookatthefollowingresearchfindings(Questions18-20)andthelistofresearchersbelow.Matcheachresearchfindingwithth
A.claimB.advancedC.challengeD.butE.constantlyF.declareG.pilesupH
A、TolookforspecialisttranslatorsontheInternet.B、Tooffermoreservicestotheirpresentcustomers.C、Totrytoemploymo
最新回复
(
0
)