首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。 运行后的窗体外观如图所示。 设有如下的类型和变量声明: Private Type Person Name As String*8:Major As S
在窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。 运行后的窗体外观如图所示。 设有如下的类型和变量声明: Private Type Person Name As String*8:Major As S
admin
2019-04-29
48
问题
在窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。
运行后的窗体外观如图所示。
设有如下的类型和变量声明:
Private Type Person
Name As String*8:Major As Stri8ng*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:\Test.dat”For Random As#1 Len=Len(p)Get#1,1,p Close#1
答案
C
解析
本题考查的考点是有关写随机文件的。随机文件的写操作步骤如下:
步骤1:用Type…EndType语句定义数据类型。
步骤2:用Open语句以Random方式打开随机文件。
[格式]Open<FileName>For Random As#<FileNumber>[Len=记录长度]
步骤3:用Put#语句将内存中的数据写入磁盘。[格式]Put#文件号,[记录长度],变量
步骤4:用Close语句关闭打开的文件。由此可看出选项C)正确。
转载请注明原文地址:https://www.kaotiyun.com/show/51Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列不属于计时器控件属性的是
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为
下面程序运行时,若输入395,则输出结果是PrivateSubCommandlClick()Dimx%x=InputBox(“请输入一个3位整数”)PrintxMod10,x\100x,(xMod100)\10EndSub
在VisualBasic中,表达式3*2\5Mod3的值是
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()Text1.Text=“:Text2.Text=…”:Text1.SetFocusEndSubPrivateSubTex
设窗体上有一个名称为Listl的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommand1click()DimiAsIntegerFori=1To500Ifp(i)Thens=s+1NextPri
以下合法的VB变量名是
在标准模块中用Public关键字定义的变量,其作用域为
随机试题
铣床一级保养时,取下丝杠时应使其键槽向(),以防平键脱落。
右位主动脉弓最常见的伴随异常是
医疗机构发生重大医疗过失行为时,应向当地卫生行政部门报告的时限为
A.三氧化二砷B.二硫化二砷C.含水硫酸钠D.含水硅酸镁E.含水硫酸钙信石的主要成分是
荷载有不同的分类方法,活荷载主要有( )。
下列属于中观分析的有()。
EPQ将各人格维度分为()。
温带森林中,在大陆东、西部都有分布,且具有不同气候特点的自然带是()。
设∑:x2+y2+z2=1(z≥0),∑1为∑在第一卦限的部分,则().
Coffeemaycounteractalcohol’spoisonous【S1】______ontheliverandhelppreventcirrhosis(肝硬化),researcherssay.Inastudyof
最新回复
(
0
)