首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击命令按钮时,将两个文本
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击命令按钮时,将两个文本
admin
2017-03-26
117
问题
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:
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:\Test.dat"For Random As#1
Get#1,1,p
Close#1
C、Open"c:\Test.dat"For Random As#1Len
=Len(p)
Put#1,1,p
Close#1
D、Open"c:\Test.dat"For Random As#1Len
=Len(p)
Get#1,1,p
Close#1
答案
C
解析
本题考查随机文件读写。以Random打开随机文件的格式为:Open文件名For RandomAs#文件号[Len=记录长度],该语句可以进行读写操作,写操作格式为:Put#文件号,[记录号],变量名,可以将一个记录变量的内容写到指定的记录位置处,如果忽略记录号,则表示在当前记录后的位置插入一条记录。读操作格式为:Get[#]文件号,[记录号],变量名,如果忽略记录号,则读出当前记录后面的那一条记录。
转载请注明原文地址:https://kaotiyun.com/show/tmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
可以在窗体模块的通用声明段中声明______。
下列能判断是否到达文件尾的函数是()。
下列关于栈的描述中错误的是______。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
改变驱动器列表框的Drive属性值将激活______事件。
属性窗口分为4个部分,这4个部分分别是______。
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsIntegerIn=______L
产生[10,27]之间的随机整数的VisualBasic表达式是
在VisualBasic的立即窗口内输入以下语句X=65<CR>PrintChr$(X)<CR>在窗口中显示的结果是
在设计阶段,当双击窗体上的某个控件时,所打开的窗口是
随机试题
下列几种电阻温度计中,哪一种的电阻温度系数最大()。
在代位继承中,代位继承人继承被代位人有权继承的遗产份额。()
机械性单纯性肠梗阻的临床症状是
大连机械设备进出口公司(2102910×××)进口一批电视机零件,其中发票第1项商品对应进料加工手册第23项料件,法定计量单位为kg;发票第2~4项为一般贸易进口货物。装载货物的运输工具于2003年8月12日申报进境()
教师职业道德区别于其他职业道德的显著标志是()。
教师的社会角色要求教师必须坚持以身立教,德识统一,这体现了教师职业道德基本原则中的()。
博物馆响应上级要求,进行安全检测,需要身份证及其他证件,检查时间长,队伍排得也长,有些人因等待时间过长而焦躁不安,甚至情绪激动开始发牢骚。你是博物馆安检负责人,将如何处理此事?
2012年,A市国税税收收入678888万元,同比增长15.1%。从各税种上看,增值税327442万元,同比下降0.4%;消费税21975万元,同比下降13.9%;企业所得税303233万元,同比增长66.1%;利息所得税60万元,同比下降75.1%;车
下列循环中,可以正常结束的是
TheDevelopmentofBalletBalletisadanceformthathasalonghistory.Thefactthatitsurvivestothisdayshowsthati
最新回复
(
0
)