首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型: 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
2018-07-11
42
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型:
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 Output As#1
B.Name=InputBox(“输入姓名”)
B.TelNum=InputBox(“输入电话号码”)
Write#1,B.Name,B.TelNum
Close#l
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#l
End sub
C、Private Sub Commandl_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 Commandl_Click()
Open“Person.txt”For Input As#l
Name=InputBox(“输入姓名”)
TelNum=InputBox(“输入电话号码”)
Print#1.Name.TelNum
Close#1
End Sub
答案
A
解析
数据文件的操作分为3步,即打开文件、写入文件和关闭文件。首先,在顺序文件中打开文件写入数据的打开方式为:Open文件名For Output As#文件号。因此B、C选项排除,只看A、D选项。写入顺序文件Print#语句格式为:Priflf#文件号,变量名,变量名…,Write语句的的格式与Print 语句一样:write#文件号,变量名,变量名。而记录类型变量不能整体引用,需要指明记录变量的成员名,格式为:记录变量名.成员名,Books类型变量B成员Name 和TelNum赋值和引用应该是B.Name、B.TelNum,因此A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/hKGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,将其放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出平均值”),即可
下面程序的执行结果是()。PrivateSubCommandl_Click()a=0k=lDoWhilek
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateYAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSu
(1)在名称为Forml的窗体上添加一个二级下拉菜单(菜单项见下表),程序运行时的窗体如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sitl.frm。(2)在名称为Forml的窗体上添加两个文本
窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommandl_Click()m=Input
窗体上有两个水平滚动条HV、HT,还有一个文本框Textl和一个标题为“计算”的命令按钮Commandl,并编写了以下程序:PrivateSubcommandl_Click()Callcale(HV.Value,HT.Value)End
随机试题
锅炉压力容器是生产中广泛使用的()的承载设备。
微分方程=0的通解是()
(2007年)全波整流、滤波电路如图8—54所示,如果输入信号ui=10sin(ωt+30°)V,则开关S闭合前,输出电压u0为()V。
国际债券是指一国借款人在国际证券市场上以本国货币为面值向外国投资者发行的债券。()
某大型电器商场是一般纳税人,本月将外购的空调10台,用于职工奖励,外购价为每台5200元(不含税价),该商场对外销售空调含税售价为每台6435元,关于企业所得税中收入的确认,下列说法正确的是()。
《中华人民共和国教育法》规定,学生教育权利包括()。
下列情形中,可以构成玩忽职守罪的是()
设f(x)连续,且∫0xtf(2x-t)dt=1/2arctanx2,f(1)=1,求∫12f(x)dx.
关于网络拓扑的描述中,正确的是()。
在以下选项中,按照C语言规定,不能出现在标识符中的是()。
最新回复
(
0
)