首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型: 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
2019-03-14
22
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10
TelNum As String*20
End Type
在窗体上画一个名为Commandl的命令按钮,要求当执行事件过程Commandl_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是( )。
选项
A、Private Sub Commandl_Click()
Dim B As Books
Open”C:\PerBon.txt”For Output 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”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 Commandl_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 Commandl_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://kaotiyun.com/show/iZFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于图片框、图像框的叙述中,正确的是
下列叙述中正确的是( )。
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是( )。
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
(1)在考生文件夹下有一个工程文件sjt3.vbp,在Form1的窗体中有一个文本框、一个计时器和两个命令按钮。程序的功能是在运行时,单击“开始计数”按钮,就开始计数(如图所示),每隔1秒,文本框中的数加1;单击“停止计数”按钮,则停止计数。要求:修改适当
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger m=1:n=0 DoWhilem
函数表达式Sgn(-10)的值是
窗体上有Command1、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommand1_Click() m=InputBox("请
表达式12/2\4的值是( )。
随机试题
实际碳酸氢盐(AB)=标准碳酸氢盐(SB),且二者均大于正常值提示
腹股沟阴囊疝常见的内容物不可能是()。
无行为能力人,若要实施终止妊娠或者结扎手术,应当经其()同意。
在合同履行中,实际违约可以分为()
中央银行通过提高存款准备金率,可以发挥的作用是()。
某上市公司发生的下列事项中,应当提交临时报告并予公告的是()。
试述法家的教育思想。
(2013年真题)简述法的规范作用与法的社会作用的关系。
道德是反映社会经济关系的特殊意识形态,具体表现在()
(2011年试题,三)求方程karctanx一x=0不同实根的个数,其中k为参数.
最新回复
(
0
)