首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Typ
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Typ
admin
2020-01-02
33
问题
窗体上有两个名称分别为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#1 Len
=Len(p)
Put#1,1,P
Close#1
D、Open"c:\Test.dat"ForRandomAs#1 Len
=Len(p)
Put#1,1,P
Close#1
答案
C
解析
本题考查随机文件读写。以Random打开随机文件的格式为:Open文件名For Random As#文件号[Len=记录长度],该语句可以进行读写操作,写操作格式为:Put#文件号,[记录号]变量名,可以将一个记录变量的内容写到指定的记录位置处,如果忽略记录号,则表示在当前记录后的位置插入一条记录。读操作格式为:Get[#]文件号,[记录号],变量名,如果忽略记录号,则读出当前记录后面的那一条记录。
转载请注明原文地址:https://jikaoti.com/ti/Frx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
窗体上有一个名称为optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionI_Click(IndexAsInteger)EndSub下面关于此过程的参数In
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的列表框,且已有若干个项目,如图(a)所示。“部分反序”命令按钮的名称为Command1。程序运行时,单击“部分反序”按钮,列表框中除最前面的一个项目不动外,其他项目的顺序反向
(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox),高、宽均为1000。在图片框内再画一个有边框的名称为Imagel的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框I
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件in5.txt中
(1)在考生文件夹下有一个工程文件sjt3.vbp。其功能是:1)单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个按升序排列的整数读入到数组a中,同时显示在Text1文本框中;2)单击“查找”按钮,则提示用户输入查找的
以下关系表达式中,其值为True的是
以下关于框架的叙述中,错误的是
下列说法中,错误的是
在数据库系统的组织结构中,下列()映射把用户数据库与概念数据库联系了起来。
随机试题
语言混合的形式有()
患者女,57岁,三个月前发烧,“发现右肺阴影”,治疗经过不详。CΥ扫描示右上肺胸膜下多房性空洞,部分空洞内可见小液平,病变周围散在小斑片状病灶,相邻胸膜增厚,最可能的诊断为:
苯作业职工定期健康检查间隔时间(年)
乳腺摄影X线机使用的自动曝光控制形式有
医学伦理学的特征之一是
学习动机的激发是指使潜在的学习动机转化为学习的行动。()
如何培养幼儿的创造性?
A、 B、 C、 D、 B
设A=有三个线性无关的特征向量,求a及An.
下列数据结构中,不能采用顺序存储结构的是()。
最新回复
(
0
)