首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型 Type Books Name As String * 10 TelNum As String * 20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
设在工程文件中有一个标准模块,其中定义了如下记录类型 Type Books Name As String * 10 TelNum As String * 20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
admin
2019-03-14
28
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String * 10
TelNum As String * 20
End Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是( )。
选项
A、Private Sub Command1_Click()
Dim B As Books
Open "c:\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 "c:\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 "c:\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 "c:\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/YrN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库管理系统中负责数据模式定义的语言是
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
以下关于过程的叙述中,错误的是
命令按钮不支持的事件为
下列叙述中正确的是
窗体上有1个Timerl计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubTimerl_Timer()PrivateSubForm_Load0IfflagThenf
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。单击“找最大值”按钮时,调用find过程分别找
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
随机试题
在Word2003的编辑状态下,选择了一个段落并设置段落“首行缩进”为1厘米,则_________。
下列所列期间,允许男方提出离婚的是【】
一般纳税人不能向税务机关准确提供增值税销项税额、进项税额、应纳税额及其他有关增值税税务资料者,不得领购使用增值税专用发票。()
下列收入应减征个人所得税的项目是()。
资料1请根据上述材料,指出下列栏目的正确选项:
某增值税一般纳税企业自建仓库一幢,购入工程物资200万元,增值税税额为32万元,已全部用于建造仓库;耗用库存原材料50万元,购入时的增值税税额为8万元;支付建筑工人工资36万元。该仓库建造完成并达到预定可使用状态,其入账价值为()万元。
民警吴某在下班回家途中,发现周某酒后驾车并一路连闯红灯,遂将肇事司机的车辆扣押,开回家中吃饭。到家后将所扣汽车停在路边,自己上楼吃饭。饭后吴某准备开车回交警大队,发现汽车已不知被谁撞坏。此案应如何处理?()
Aneweconomicspaperhassomeold-fashionedadviceforpeoplenavigatingthestressesoflife:Findaspousewhoisalsoyourb
Whatdidthepersondoeveryday?
So-called"greenroofs"—urbanrooftopscoveredwithgrasses,plantsandothertypesofgreenery—arebecomingincreasinglypopula
最新回复
(
0
)