首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Typ
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Typ
admin
2016-01-22
73
问题
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:
Type Person
name As String*8
major As String*20
End Type
当单击命令按钮时,将两个文本框中的内容写入一个随机文件Test.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是( )。
选项
A、Open"c:\Test.dat"For Random As#1 Put#1,1,p Close#1
B、Open"c:\11est.dat"For Random As#1 Get#1,1,p Close#1
C、Open"c:\Test.dat"For Random As #1 Len=Len(p) Put#1,1,p Close#1
D、Open"c:\Test.dat"For Random As #1 Len=Len(p) Get#1,1,p Close#1
答案
C
解析
本题考查随机文件读写。以Random打开随机文件的格式为:Open 文件名 For Random As #文件号 [Len=记录长度],该语句可以进行读写操作,写操作格式为:Put#文件号,[记录号],可以将一个记录变量的内容写到指定的记录位置处,如果忽略记录号,则表示在当前记录后的位置插入一条记录。读操作格式为:Get[#]文件号,[记录号],变量名,如果忽略记录号,则读出当前记录后面的那一条记录。
转载请注明原文地址:https://kaotiyun.com/show/wwLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
能够改变窗体边框线类型的属性是()。
控件是()。
用Print方法在Form1窗体中显示出4个#号的正确代码为()。
执行下面程序,第一行输出结果是[],第二行输出结果是[]。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2CallSub1(A)EndSubPriv
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性
设有如下程序段:a$="BeujingShanghai"b$=Mid(a$,Instr(a$,"g")+1)。执行上面的程序段后,变量b$的值为______。
下列叙述中正确的是()。
软件定义时期主要包括______和需求分析两个阶段。
程序测试分为静态测试和动态测试。其中______是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
随机试题
A.引起特定感觉并激发大脑皮层发放传出冲动B.协调各种感觉在大脑皮层与皮层下结构之间的联系C.维持和改变大脑皮层的兴奋状态和维持觉醒状态D.维持睡眠状态E.参与学习和记忆网状结构上行激动系统的主要功能是
A.单层立方上皮B.单层柱状上皮C.复层扁平上皮D.单层立方或单层柱状上皮E.变移(移行)上皮宫颈黏膜上皮
患者,男,50岁。反复浮肿,尿血3年。症见:面色无华,少气乏力,易感冒,午后低热,口干咽燥,舌偏红少苔,脉细。检查:血压140/95mmHg(18.6/12.6KPa),尿蛋白(++)。定量3g/日,尿红细胞20个/高倍视野,内生肌酐清除率48%。其诊断是
下列除哪项外,均为阳明腑实证的临床表现( )。
下列不属于排水管道系统上的附属构筑物的是( )。
室内燃气引入管安装时,当管道升高或回低时,应在低处( )。
《商业银行开办代客境外理财业务管理暂行办法》中规定,商业银行进行境外理财投资,其用于境外投资的全部资产应当()。
我国西北、华北等黄土地带常见的传统居民住宅形式是()。
刑法的本质属性是()。
HardworkhasbeenanimportantpartoftheAmericanbelieffromthenation’sbeginning.TheAmericanideathathardworkwasto
最新回复
(
0
)