首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Command1的命令按
设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Command1的命令按
admin
2018-05-08
49
问题
设在工程文件中有一个标准模块,其中定义了如下记录类型:
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("输入电话号码")
Prim #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/xlGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,运行情况如图2-23所示。程序的功能是计算表达式的值:z=(x-2)!+(x-3)!+(x-4)!+…+(x-N)!其中的N和x值通过键盘分别输入到两个文本框Textl、Text2中。单击名称为Comm
窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType当单击命令按钮时,将两个文本框
当一个工程含有多个窗体时,其中启动窗体是()。
下列关于控件数组的叙述中,正确的是
以下关于控件数组的叙述中,错误的是
若要清除列表框控件中的所有列表项,应该使用的方法是
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
在面向对象方法中,不属于“对象”基本特点的是()。
下列关于菜单的说法中,错误的是
设有如下程序段,则正确的说法是Fori=1To100Step0x=x+1Next
随机试题
与乌头相反的药有
背景资料某高速公路项目,路面面层为沥青混凝土,基层为级配碎石,项目经理部决心精心组织、科学施工,搞好现场技术质量管理,做了包括如下环节的工作:——项目经理部由总工程师组织进行了技术交底;——为真正落实公司的现场技术管理制度制定了执行细则,其中,为避免
个人抵押授信贷款的贷后检查手段包括()
在进行财务分配时,支付给债权人的利息和支付给股东的股利在财务处理上是不一样的,支付给债权人的利息属于()。
(1)立案侦查(2)翻墙入室(3)撬开金库(4)擒拿罪犯(5)盗走现金
若某完全二叉树的结点个数为100,则第60个结点的度为().
在认识的本质问题上,17世纪牛顿提出“粒子说”,17世纪末惠更斯提出“波动说”,两种学说在科学史上争论了几个世纪。直到1922年,爱因斯坦把两者统一起来,建立“波粒二象性”的学说,这个矛盾才得以解决。这一历史事件所包含的哲理是
Plato’sRepublichasbeenthesourceofgreatconsternation,especiallyinliterarycircles,foritsattackonthepoets.Socrat
Marysaidtome,"HadIseenyourbag,I______ittoyou."
A、Hefeelsunsympathetic.B、Hefeelsit’sapity.C、Hefeelsit’sunfair.D、Hefeelsglad.A
最新回复
(
0
)