首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2013-04-11
44
问题
在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 s As student Open "c:\student.txt" For Random As #1 Len = Len(s) For i = 1 To 1 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
答案
4
解析
本题考查随机文件的读写,在For循环中,向随机文件中写入5个学生的信息,所以应使用写操作语句,在随机文件中,写操作用Put语句,其格式为: Put#文件号,[记录号],变量
转载请注明原文地址:https://jikaoti.com/ti/8UO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对建立良好的程序设计风格,下面描述正确的是______。
文件根据数据性质,可分为【】文件和【】文件。
编写如下事件过程:PrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6A
使用驱动器列表框的______属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。
在用菜单编辑器设计菜单时,必须输入的项是______。
若在Shape控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
设有以下循环结构Do循环体LoopWhile<条件>则以下叙述中错误的是______。
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。
以下关于菜单的叙述中,错误的是______。
软件需求分析—般应确定的是用户对软件的______。
随机试题
简述教育法的法源。
发展中国家设置服务贸易壁垒的主要原因是
儿童哮喘的诊断标准中,错误的是
A.在胃液中形成胶体物,保护溃疡面B.阻断H2受体C.阻断促胃液素受体D.抗幽门螺杆菌药E.抑制胃壁细胞质子泵枸橼酸铋钾抗消化性溃疡的机制是
某市烟丝加工厂为增值税一般纳税人,2008年8月向农业生产者收购烟叶100吨,收购凭证上注明价款100万元,并已按规定缴纳烟叶税22万元;购进用于采集增值税专用发票抵扣联信息的扫描器具和计算机一批,取得增值税专用发票上注明税额25.2万元,当月还自某农场收
关于注册商标的转让,下列说法正确的是()。
简答无差异市场营销的基本特点和优缺点。
[2007年]设f(x)是区间[0,π/4]上的单调可导函数,且满足∫0f(x)f-1(t)dt=∫0xtdt其中f-1是f的反函数,求f(x).
Atthemoment,mobileTVismostlystreamedover3Gnetworks.Butsendinganindividualdatastreamtoeachviewerisinefficien
TheAmericanneedtoownthingsispartlytheresultofmassadvertising,【C1】______urgesconsumerstodiscardlastyear’scaro
最新回复
(
0
)