首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum AS String*20 End Type 要求在执行事件过程Commandl Cli
假定在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum AS String*20 End Type 要求在执行事件过程Commandl Cli
admin
2012-12-08
58
问题
假定在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10
TelNum AS String*20
End Type
要求在执行事件过程Commandl Click时,在顺序文件Person.txt中写入一条记录。
下列能够完成该操作的事件过程是( )。
选项
A、Private Sub Commandl Click()
Dint B AS B00kS
B.Name=InputBox(“输入姓名”)
B.TelNum=InputBox(”输入电话号码”)
Write#1,B.Name,B.TelNurn
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.TelNLlm
Close#1
End Sub
C、Private Sub Commandl Click()
Dim B As Books
Open“c:\Person.txt”For Output As#l
Name=InputBox(”输入姓名”)
TelNom=InputBox(”输入电话号码”)
Write#1,B
Close#1
End Sn1h
D、Private Sub Commandl Click()
Dim B AS Book
Open“c:\Person.txt”For Input As#1
Name=InputBox(“输入姓名”)
TelNum-InputBox(“输入电话号码”)
Print#1,B.Name.B.TelNHm
Close#1
End Sub
答案
A
解析
转载请注明原文地址:https://kaotiyun.com/show/bkhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库管理系统是位于用户与【】之间的软件系统。
数据字典是各类数据描述的集合,它通常包括5个部分,即数据项、数据结构、数据流、【】和处理过程。
如果存在如下过程: PrivateFunctionFMax(a()AsInteger) DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(A)Last=UB
在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是______。
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:PrivateSubForm_Click()Text1.Text="VB程序设计"EndSubPrivateSubText1_Change()Picturel.Print"VB
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:MicrosoftVisualBasicProgramming然后编写如下事件过程:PrivateSubCommandl_Click(
用树形结构表示实体之间联系的模型是______。
下面关于数据库系统的叙述正确的是
设有如下变量声明:DimTestDateASDate为变量TestDate正确赋值的表达方式是
系统符号常量的定义可以通过______获得。
随机试题
驾驶机动车遇到这种情况时,要快速向左绕过。
设f(x)=ax3-6ax2+b在区间[-1,2]的最大值为2,最小值为-29,又知a>0,则a,b的取值为______.
在山地条件下,影响植被分布的主要地形要素有哪些?
细胞毒素类抗癌药有
消化性溃疡的病理损伤深度浅者至少达
急性肾型肾衰竭最常见的原因是
药物稳定性研究的重点是
设定目标的意义就在于()。
在当代中国,坚持发展是硬道理的本质要求,就是()。
TheNBAlockout(停工)didnotfinishonThursdaynight,butitwasnearlyanend,amidlight-heartedjokesandaggressivewordchoi
最新回复
(
0
)