首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为“Student。txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为“Student。txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2020-06-30
41
问题
在E盘当前目录文件夹下建立一个名为“Student。txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As String*10
StuAge As Integer
End Type
Private Sub Form_Click()
Dim SAs student
Open“c:\student.txt”For Random As#1 Len=
Len(s)
For i=1 To 5
s.StuName=InputBox(“请输入姓名”)
s.StuGrade=InputBox(“请输入年级号”)
s.StuAge=Val(InputBox(“请输入年龄”))
Next i
Close#1
End Sub
选项
A、Print#1.S
B、Print#1,i
C、Put#1,s
D、Put#1,i
答案
C
解析
本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件,打开文件的格式为:Open Pile Name For Random As#文件号[Len=几句长度]然后以命令写入一条记录,格式为:PUt[#]文件号[记录号]变量名。若省略记录号,表示在当前记录每下写入记录型变量,逗号(,)不可以省略。
转载请注明原文地址:https://kaotiyun.com/show/znHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionf(xAsInteger)DimYAsIntegerx=20Y=2f=X*YEndFunction
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
下列控件属性中,属性值的类型不相同的一项是()。
以下关于VB特点的叙述中,错误的是
设窗体上有1个垂直滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是()。
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是()。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
己知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1Click()DimsumAsInteg
计算机软件包括
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click() n%=List1.ListIndex Ifn>0Then ch$=List1.Lis
随机试题
手术中识别输卵管的标志是
A.血尿B.高热、休克、惊厥、呼吸衰竭C.头痛、腰痛、眼眶痛D.眼红、腿痛、淋巴结肿大E.相对缓脉中毒型菌痢表现为
A.肾俞、命门B.肺俞、脾俞C.气海、足三里D.百会、神门E.行间、阳陵泉治疗遗尿肾气不足证,除主穴外,还应选取的配穴是()
“预期收益大于投资成本”是企业决定投资的()条件。
建设工程勘察设计合同发包人的义务包括()。
能独立完成铲土、运土、卸土、填筑、压实等工作的土方工程机械是()。
某铜矿2017年8月销售当月产铜矿石原矿取得销售收入600万元,销售精矿取得收入1200万元。已知:铜矿的计税依据为精矿,该矿山铜矿精矿换算比为1.2,适用的资源税税率为6%。则该铜矿8月应缴纳的资源税税额的下列计算中,正确的是()。
社区工作较多涉及社会层面,牵涉社会政策分析以及社会制度的改变,注重()。[2009年真题]
我国的宪法监督体制属于()。
=______。
最新回复
(
0
)