首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2020-02-27
70
问题
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。
Pri vate Type student
StuName As String*10
StuGrade As String*10
StuAge As Integer
End Type
Private Sub Form Click()
Dim s As student
Open"c:\student.txt”For Random As#1 Len=Len(s)
For i=1 To 5
s.StuName=lnputBox("请输入姓名")
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 FileName For Random As #文件号[Len=记录长度],然后以Put命令写入一条记录,格式为:Put[#]文件号,[记录号],变量名。若省略记录号,表示在当前记录号下写入记录型变量,逗号(,)不可以省略。
转载请注明原文地址:https://kaotiyun.com/show/k3Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Text1上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是()。
结构化程序的三种基本结构是()。
下面描述中不属于软件需求分析阶段任务的是()。
由关系R1和R2得到关系R3的操作是()。
窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框,窗体的单击事件过程如下:PrivateSubForm_Click()CD1.DialogTitle="改变颜色"CD1.Color=Form1.BackColorCD1.Act
程序运行时,拖动滚动条上的滚动框,则所触发的事件是()。
表达式Chr(Asc("G")+3)的值是()。
数据字典(DD)所定义的对象都包含于
在面向对象方法中,不属于“对象”基本特点的是()。
指令“Circle(1500,1200),1000,,,,0.5”将会绘制出的图形为()。
随机试题
指示对乙肝病毒感染有保护作用的指标为
A.石膏B.知母C.芦根D.天花粉E.栀子功能清热泻火,滋阴润燥的药物是
男性,18岁,近1年来对家人亲友变得冷淡,不去上学,不洗澡,不主动更换衣服,对与自己有关的各种事情表现得无动于衷。最可能的诊断是
某女,55岁。与家人口角后出现胁肋胀痛,脘腹灼热疼痛,口苦,舌红苔黄,脉弦数。用药首选
排便时有鲜血滴出,常见于
图5-11所示为一三角拖架,AB为钢杆[σ]1=40MPa,A1=14cm2,BC为木杆[σ]2=10MPa,A2=100cm2,ABC连接处均可视为铰接,从强度方面计算竖向荷载F的最大许用值为()。
以下各项中,既与外部因素有关。又与内部因素有关的是()。
2012年1~5月,规模以上轻工企业累计实现工业总产值66933.3亿元,同比增长18.4%:5月份完成工业总产值14777.1亿元,同比增长15.7%。农副食品加工、塑料制品、食品制造、造纸、家电、皮革及制鞋、酿酒、五金、工美、家具、软饮料等11个行业累
查询“仓库”表的所有记录并存储于临时表文件temp中的SQL语句是()。
Ananimalspeciesbecomesextinctwhenitfailstoproduceenoughyoungineachgenerationtokeeppacewiththedeath-rate.We
最新回复
(
0
)