首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10:TelNum As String*20 End Type 在窗体上画一个名为Commandl的命令
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10:TelNum As String*20 End Type 在窗体上画一个名为Commandl的命令
admin
2020-04-18
55
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10:TelNum As String*20
End Type
在窗体上画一个名为Commandl的命令按钮,要求当执行事件过程Commandl Click时, 在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是
选项
A、Private Sub Commandl Click()
Dim B As Books
Open”Person.txt”For OUtout As#1
B.Name=InputBox(”输入姓名”)
B.TelNum=InputBox(”输入电话号码”)
Write#1,B.Name,B.TelNum
Close#1
End Sub
B、Private Sub Commandl Click()
Dim B As Books
Open”Person.txt”For Input As#1
B.Name=InputBox(”输入姓名”)
B.TelNum=InputBox(”输入电话号码”)
Print#1.B.Name.B.TelNum
Close#1
End Sub
C、Private Sub Command l_Click()
Dim B As Books
Open”Person.txt”For Outout As#1
B.Name=InputBox(”输入姓名”)
B.TelNum=InputBox(”输入电话号码”)
Write #1.B Close#1
End Sub
D、Private Sub Command l_Click()
Open”Person.txt”For Input As#1
Name=InputBox(”输入姓名”)
TeiNum=InputBox(”输入电话号码”)
Print #1.Name,TelNum
Close#1
End Sub
答案
A
解析
本题考查的考点是有关文件的。打开顺序文件的基本格式为:Open FileName For Mode As#FileNumber
其中,FileName表示要打开的文件的路径:Mode为文件打开模式:OutPut用于输出、Append用于追加写入、Input用于读取;FileNumber为打开文件时指定的句柄(文件号)。本题中由于需要写入到文件中,所以Mode应该为Output;写入文件时如果写入的是一个自定义类型的变量,则需要把这个变量的每个成员分别写入到文件中,而不能一次性写入整个变量。
转载请注明原文地址:https://kaotiyun.com/show/VlTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存取方式是()。
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
下列程序段的执行结果为()。a=0:b=1Doa=a+b:b=b+1LoopWhilea<10Printa:b
下列程序段的执行结果为()。x=Int(Rnd+4)SelectCasexCase5:Print"AClass"Case4:Print"BClass"Case3:Print"CCla
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1_Click()Dima%,b%,i%s=1:a=2Fori=2T
(1)考生文件夹中有工程文件sjt3.vbp。在窗体上有名称为Combo1的组合框,请设置该组合框的属性,使该组合框只能用于选择操作,不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项,如图5(a)所示,
设有下面的程序段:x=InputBox(”请输入一个整数”)ReDima(x)Fork=xTo0Step一1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面
编写如下程序:PrivateSubCommand1_Click()DimnumAsInteger,kAsInteger,nAsIntegerhum=InputBox(”请输入一个正整数:”)k=
下面程序在调试时出现了死循环PrivateSubCommandl_Click()n=InputBox(“请输入一个整数”)DoIfnMod2=0Thenn=n+1Else
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)请在名称为Form1的窗体上建立一个二级下拉菜单,第一级共有两个菜单项,标题分别为“文件”、“编辑”,名称分别为file、edit;在“编辑”菜单下有第二级菜单,
随机试题
标准砝码的质量为ms,测量结果为100.02147g,合成标准不确定度为uc(ms)为0.35mg,veff=9,按p=95%,查t分布值表得kp=t95(9)=2.26,U95=2.26×0.35mg=0.79mg。则Up可采用以下___________
“思君令人老,岁月忽已晚。弃捐勿复道,努力加餐饭。”出自
默认情况下,Windows7已经设置了视频、图片、文档和______________的子库。
A型血的红细胞膜上的抗原是
油罐充水试验中,采用低合金钢时,水温不能低于( )。
UntilItookDrOffutt’sclassinDeMathaHighschool,Iwasanunderachievingstudent,butIleftthatclass【C1】______neverto
最近几年,北亚的气候普遍比较凉。但是,在北亚的日平均气温和湿度比正常水平稍高的那段时间内,那儿生长的庄稼的产量却显著增加。在下个世纪,在那一段时间内获得的增加的日平均气温和湿度将有望成为下个世纪的正常状态。然而科学家预测,在下个世纪大多数地区的庄稼的年产量
以下哪个选项中的作品全部出自美国作家之手?
由大革命失败到土地革命战争时期的历史转折点是()。
InalabinOxfordUniversity’sexperimentalpsychologydepartment,researcherRoiCohenKa-doshistestingarelativelynewbra
最新回复
(
0
)