首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String * 10 TelNum As String * 20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Co
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String * 10 TelNum As String * 20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Co
admin
2019-03-14
37
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String * 10
TelNum As String * 20
End Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是( )。
选项
A、 Private Sub Command1_Click()
Dim B As Books
Open "Person.txt" For Output As #1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write #1, B.Name, B.TelNum
Close #1
End Sub
B、 Private Sub Command1_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 Command1_Click()
Dim B As Books
Open "Person.txt" For Output As #1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write #1, B
Close #1
End Sub
D、 Private Sub Command1_Click()
Open "Person.txt" For Input As #1
Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Print #1, Name, TelNum
Close #1
End Sub
答案
A
解析
数据文件的写操作分为3步,即打开文件、写入文件和关闭文件。
首先,在顺序文件中打开文件写入数据的打开方式为:Open 文件名 For Output As #文件号。因此B、C选项排除,只看A、D选项。
写入顺序文件Print #语句格式为:Print #文件号,变量名,变量名…,Write语句的的格式与Print语句一样:Write #文件号,变量名,变量名。而记录类型变量不能整体引用,需要指明记录变量中的成员名,格式为:记录变量名.成员名,Books类型变量B成员Name和TelNum赋值和引用应该是B.Name、B.TelNum,因此A选项正确。
转载请注明原文地址:https://jikaoti.com/ti/4rN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
设有如下函数:FunctionDelSpace(chAsString)AsIntegerDimn%,st$,c$st=“”:n=0Fork=1ToLen(ch)C=Mid(ch,k,1)Ifc“”Thenst=st&CEl
设有如下程序:PrivateSubInv(ByValxStrAsString,yStrAsString)DimtStrAsStringDimLAsIntegerL=Len(xStr)DoWhileL>=1tStr=tStr
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:PrivateSubCommand1Click()DimxAsInteger,yAsIntegerStaticzAsIntegerx=3:y=5:z=yCall
能正确表述“x为大于等于5并且小于20的数”的VisualBasic表这式是
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
下列不能打开工具箱窗口的操作是()。
如下关于变体类型变量的叙述中,错误的是
执行以下程序段a$=”VisualBasicProgramming”:b$=“C++”c$=UCase(Left$(a$,7))&b$&RightS(a$,12)变量c$的值为
随机试题
看问题“只见树木,不见森林”是()
A.抑制血小板聚集B.抑制凝血酶的产生和活性C.纤溶激活剂D.使血小板解聚E.单纯灭活凝血酶tPA
甲向乙借款2万元,并由丙从中作保,三人均在借款合同上签字。后甲请求乙推迟还款期限1年,乙应允,但提出推迟1年期间的利息为30%,甲同意,并签订了变更合同协议。甲、乙将变更合同的内容告知了丙。丙当时碍于情面,口头表示同意。后因甲到期不能还款,遂发生纠纷。丙应
试回答人工加速耐候性试验的相关问题。累计辐射能量计算式为()。
在清洁生产分析中,()指标不需要定量。
下列选项中属于显性成本的是()。Ⅰ.佣金Ⅱ.过户费Ⅲ.对冲费用Ⅳ.印花税
企业定员的范围包括()。
结合材料回答问题:材料1党的十九大站在历史和时代的高度,深刻阐述了新时代坚持和发展中国特色社会主义的一系列重大理论和实践问题,概括、总结出了习近平新时代中国特色社会主义思想。对于习近平新时代中国特色社会主义思想的丰富内涵,党的十九大报告已经
DESTINATIONFLIGHTNO.DEPARTSARRIVESCopenhagenBA99411:1013:35FrankfurtSR84308:1011:05MunichLH07713:3
I______oneofmyoldclassmatesinthestreetyesterday.
最新回复
(
0
)