首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗伪外观如图所示。 设有如下的类型和变量声明: Private Type Person name As String*8 maj
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗伪外观如图所示。 设有如下的类型和变量声明: Private Type Person name As String*8 maj
admin
2019-03-14
67
问题
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗伪外观如图所示。
设有如下的类型和变量声明:
Private Type Person
name As String*8
major As String*20
End Type
Dim p As Person
设文本框中的数据已正确地赋值给Person类型的变量p,当单击“保存”按钮时,能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是( )。
选项
A、Open"c:\Test2.dat"For Output As#1
Put#1,1,p
Close#1
B、Open"c:\Test2.dat"For Random As#1
Get#1,1,p
Close#1
C、Open"c:\Test2.dat"For Random As#1 Len=Len(p)
Put#1,1,p
Close#1
D、Open"c:\Test2.dat"For Random As#1 Len=Len(p)
Get#1,1,p
Close#1
答案
C
解析
在VB中可以访问的文件有:顺序文件、随机文件和二进制文件。不同文件存取方式不同,但处理的步骤大致一样:
①用Open语句打开文件,并为文件制定一个文件号。根踞文件的的存取方式使用不同的模式打开文件。
本题是随机文件,读写的是一条一条的记录,所以用ForRandom模式打开,记录的长度为Person类型变量p的长度。
②从文件中读出数据进行处理或处理数据后,把数据写入文件。
本题是把变量的数据写入随机文件,所以用Put语句写入。
③文件操作结束,关闭文件。各种文件关闭统一用Close#文件号 关闭。
综上所述,故本题选C。
转载请注明原文地址:https://kaotiyun.com/show/FoUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:OptionBase1PrivateSubCommand1Click()Dimaa=Array(1,2,3,4):s=0:j=1Fori=4To1Step—1s=s+a(i)*j:j=j*10NextiP
为了删除列表框中的一个列表项,应使用的列表框方法是
下列选项中属于面向对象设计方法主要特征的是
窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序:PrivateSubCommandl_elick().DimnIfTextl.Text◇”123456”Thenn=n+1:Print”口令输入错误”&n&“
以下能够设置控件焦点的方法是
设窗体上有一个Textl文本框和一个HScrolll水平滚动条,并有下面的事件过程:PrivateSubHScrolllShange()Textl=HScrolllEndSub在程序运行时,当把滚动框移动到最左边时,文本框中显示的
有数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行语句后,不是整型变量的是
数据库设计中,用E-R图来描述信息结构但不涉及信息在计算机中的表示,它属于数据库设计的
为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为
随机试题
已婚职工探望父母的,每四年给假一次,假期为()
下列备注答案中,哪-个属于逆规散光
X线机上不常用的仪表有
甲企业未按规定向乙企业支付货款,乙企业按合同规定向甲企业收取违约金,由于违约金是在销售实现后收取的,故不属于销售额范围。()
赵女士经常当着外人的面指责儿子小辉,不是说他学习不用功,辜负了妈妈的期望,就是抱怨他不听话,总是与妈妈对着干。赵女士的抱怨没有让小辉有任何改变,反而让小辉对妈妈产生了抵触情绪。社会工作者依据家庭成员增能的原则,尝试缓解母子间的紧张关系。社会工作者对赵女士的
松散群体是指学生们只在空间和时间上结成群体,但成员间尚无共同活动的()。
教育行政部门取缔了一批违反国家规定私自招收未成年学生的私立学校。教育行政部门这一行为的法律依据是()。
[*]
下列软件中不支持SNMP的是()。
Whydon’tbirds(71)lostontheirlongflightsfromoneplacetoanother?Scientistshavepuzzledoverthis(72)formany
最新回复
(
0
)