首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2017-08-22
49
问题
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As String*10
StuAge As Integer
End Type
Privme Sub Form_Click()
Dim s As student
Open"c:Mtudent.txt"For Random As #1
Len=Len(s)
For i=l To 5
s.StuName=InputBox("请输入姓名")
s.StuGrade=InputBox("请输入年级号")
s.StuAge=Val(1nputBox("请输入年龄"))
____________
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 FileName For Random As #文件号[Len=记录长度],然后以Put命令写入一条记录,格式为:Put[#]文件号,[记录号],变量名。若省略记录号,表示在当前记录号下写入记录型变量,逗号(,)不可以省略。
转载请注明原文地址:https://kaotiyun.com/show/rtGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当用__________________方式打开文件时,如果对文件进行写操作,则写入的数据附加到原文件的后面。
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是______。
下列程序段的执行结果为______。K=0ForI=1To3A=I^I^KPrintA;NextI
下列数组声明正确的是()。
为了使标签能自动调整大小以显示全部文本内容,应把标签的【】属性设置为True。
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()DimcAsIn
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Forml和Form2,启动窗体为Forml。在Forml上画一个命令按钮Commandl,程序运行后,要求当单击该命令按钮时,Forml窗体消失,显示窗体Form2,请在横线处将程序补充
【】的功能是用于显示当前过程中的有关信息,当测试一个过程时,可在其中输入代码并立即执行。
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。PrivateSubForm_Click()DimiAsInteger Open"Num.txt”ForOutputAs#1
随机试题
下列选项中,不属于宾语省略的一项是【】
腹外疝术后对患者正确的要求是
以下不属于虚证临床表现的是
某男,25岁。近日,腹痛肠鸣,泻下粪便臭如败卵,泻后痛减,泻下伴有不消化食物,脘腹胀满,嗳腐吞酸,不思饮食。舌苔垢浊或厚腻,脉滑。治疗宜选用的中成药是()。
中国银监会选择以()作为我国混合资本工具的主要形式。
根据刑事法律制度的规定,下列行为构成违法提供出口退税凭证罪的有()。
甲公司与张某签订了3年的劳动合同,在劳动合同中约定试用期满的月工资800元,甲公司所在地的最低工资标准为750元。根据劳动合同法律制度规定,张某在试用期的月工资不得低于()元。
某班级数学期末考试中,参加过某课外辅导班的学生成绩要明显优于没有参加该课外辅导班的学生,所以该数学课外辅导班的效果非常好。以下哪项如果为真,最能削弱上述论述?
计算行列式
Beingassertiveisbeingabletocommunicatewithotherpeopleclearly.Ifyoufeltthatyouhadexpressedwhatwasimportantto
最新回复
(
0
)