首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明: Private Type Person name As String*8 major As St
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明: Private Type Person name As String*8 major As St
admin
2015-06-30
53
问题
在窗体上有两个名称分别为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语句打开文件,并为文件制定一个文件号。根据文件的的存取方式使用不同的模式打开文件。
本题是随机文件,读写的是一条一条的记录,所以用For Random 模式打开,记录的长度为Person类型变量p的长度。
②从文件中读出数据进行处理或处理数据后,把数据写入文件。
本题是把变量的数据写入随机文件,所以用Put语句写入。
③文件操作结束,关闭文件。各种文件关闭统一用 Close #文件号 关闭。
综合一下,故选C。
转载请注明原文地址:https://kaotiyun.com/show/gNQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行期间,如果拖动滚动条上的滚动块,则触发的滚动条事件是______。
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是【】。
对长度为N的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
下列关于队列的叙述中正确的是______。
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommandl_C1ick()DimiAsInteger,nAsIntegerFori=0
在软件测试设计中,软件测试的主要目的是()
VB的工程资源管理器可管理多种类型的文件,下面叙述正确的是______。
可决定窗体的左上角是否有控制菜单的属性是______。
下列关于文件的叙述正确的是
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员,从职员到部门的联系类型是
随机试题
专简零回答在麦克莱兰的成就需要理论中,对有不同主导需要的员工,管理与激励措施有哪些方面的不同?
改革是全面的改革,其中重点是( )
超声心动图胸骨旁左心室长轴切面观察的结构(图12—1),不包括
前间隔心肌梗死是由于
A.宫颈刮片细胞学检查B.分段诊断性刮宫C.接触性出血D.最常见的妇科良性肿瘤E.绝经后阴道不规则出血子宫颈癌首选的普查方法是
某企业2012年相关收入及支出情况如下:营业收入600000元,营业成本350000元,销售费用15000元,管理费用20000元,财务费用18000元,投资收益50000元,营业外收入35000元,营业外支出12000元,资产减值损失25
《国务院关于积极推进“互联网+”行动的指导意见》指出,加快推进“互联网+”发展,有利于()。
犯罪未遂具有()特征。
______foreverarethedays______Iwasyoung.
TheVirusHuntersThemouthoftheAmazonRiverhaslongbeenastartingplaceforhuntersgoingtothejunglesofBrazil.
最新回复
(
0
)