首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有两个名称分别为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
2018-12-20
41
问题
在窗体上有两个名称分别为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/ZkFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:则关系T是由关系R和S通过某种操作得到,该操作为( )。
窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。Option1的单击事件过程如下:PrivateSubOption1_Click() Dimarr arr=Array("
用来设置文字字体是否为粗体的属性是( )。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
下列符号常量的声明中不合法的是
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是
设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
随机试题
Havingsaved______money,Marywasabletobuyhereldersisterawatch.
禁忌使用乙醚吸入麻醉的是
2002年某房地产价格评估机构年应纳税所得额为99872元,应按()计征企业所得税。
锅炉安装完毕后要进行烘炉,其目的是()。
部门支出预算中,项目支出预算的编制原则包括()。
教育目的对一切教育活动都有指导意义。()
在抗日民族统一战线中,中间势力主要是指()
一台交换机具有24个10/100Mbps全双工端口和2个1000Mbps全双工端口,如果所有端口都工作在全双工状态,那么该交换机总带宽为()。
在类的定义中,用于为对象分配内存空间,对类的数据成员进行初始化并执行其他内部管理操作的函数是()。
Whichofthefollowingcanbestdescribehissituation?
最新回复
(
0
)