首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在E盘当前目录文件夹下建立一个名为“Student:txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在E盘当前目录文件夹下建立一个名为“Student:txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
admin
2012-09-07
40
问题
在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 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 ForRandom As#文件号[Len=记录长度],然后以Put命令写入一条记录,格式为:Put[#]文件号,[己录号],变量名。若省略记录号,表示在当前记录号下写入记录型变量,“,”不可以省略。
转载请注明原文地址:https://kaotiyun.com/show/Jxhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框图,其Name属性为Cont,瑞画一个命令按钮,Name属性为Command1,然后编写如下事件过程: PrivuteSubCommand1_Click() Cont.FileName="" Cont.Fla
MsgBox函数的返回值的类型为
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请将程序补充完整。PrivateSubForm_Load()
下列叙述中,正确的是
数据库设计包括两个方面的设计内容,它们是
以下语句可以实现将文件filename1复制为filename2的是______。
对于长度为n的顺序存储的线性表,当随机插入和删除一个元素时,需平均移动元素的个数为【】。
下列四个关于DoEvents语句的叙述中,正确的是______。
在计算机中,算法是指_______。
随机试题
肠出血性坏死可发生于
下列哪项不是中风中经络的主症()
国内第一只上市的开放式基金为()。
在进行培训需求分析时,排他分析是指排除由于()影响绩效而申报的培训意向。
求下列函数的导数.
根据下列材料回答问题。2012年1--4月,该市平均每天观看电影的观众超过10万人次的月份有几个?()
要将VisualFoxPro系统菜单恢复成标准配置,可以先执行【】命令,再执行SETSYSMENUTODEFAULT命令。
有以下程序:#include<string.h>main(intargc,char*argv[]){inti,len-0;for(i=l;i<argc;i+=2)len+=strlen(argv
England’sbinge-drinkinghabitisoneofthemostentrenchedinEurope—evenRomaninvaderswroteaboutitwithhorror.Manyfear
TheChamberofCommerceforthecityofMillwoodhasreceivedpreliminarystudiesontheleasecostforcommercialproperties.S
最新回复
(
0
)