某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String10 Tel As String 20 End Type Private Sub Commandl_Click() Di

admin2020-07-22 53

问题某人编写了向随机文件中写一条记录的程序，代码如下：
Type RType
Name As String*10
Tel As String * 20
End Type
Private Sub Commandl_Click()
Dim p As RType
P．Name=InputBox(”姓名”)
P．Tel=InputBox(”电话号”)
Open”Books．dat”For Random As#1
Put#1..P
Close#1
End Sub
该程序运行时有错误，修改的方法是( )。

选项 A、在类型定义“Type RType”之前加上“Private”
B、Dim P As RType必须置于窗体模块的声明部分
C、应把Open语句中的For Random改为For Output
D、Put语句应该写为Put#1，P．Name，P．Tel

答案A

解析记录类型的定义必须放在模块的声明部分，当在标准模块中定义时，关键字Type前可以有Public(默认)或Private，而如果在窗体模块中定义，则必须在前面加上关键字Private。Open语句中使用For Random表示文件以随机方式存取。Put语句的语法为：Put#文件号，[记录号]，变量。其中“变量”是除对象变量和数组变量外的任何变量。

转载请注明原文地址:https://www.kaotiyun.com/show/IrHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String10 Tel As String 20 End Type Private Sub Commandl_Click() Di

二级VB

NCRE全国计算机二级

设x为一整型变量，且情况语句的开始为：SelectCasex，则不符合语法规则的case子句是()。

窗体上有两个名称分别为Textl、Text2的文本框，一个名称为Commandl的命令按钮。设有如下的类型声明：TypePersonnameAsString8majorAsString20EndType当单击命令按钮时，将两个文本框

运行下列程序时，输出的结果是()。PrivateSubForm_Click()Dimxx=Array(”Software”，”and”，”Hardware”，”System”)For

设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：PrivateSubCheck1_Click(IndexAsInteger)　　…EndSub则下面叙述中错误的是(　　)。

下面有关标准模块的叙述中，错误的是(　　)。

下列关于控件数组的叙述中，正确的是

下列叙述中，错误的是

考生文件夹下存在一个数据库文件“samp3．accdb”，里面已经设计好表对象“tStud”，同时还设计出窗体对象“fStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计。(1)将窗体标题改为“学生查询”

下列关于算法复杂度叙述正确的是

有主体带的中、低渗透性油层，在注水开发过程中，油层主体部分()。

鸟何萃兮蘋中。萃：

哮喘缓解期肾气虚弱证的特征不包括

工程建设监理中的信息管理的内容有()。

历代帝王陵墓中“因山为穴”的是（　）。

资料：某客户甲上年税后收入为60000元，年终结余24000元(均存入银行)。投资资产(均为股票)为26000元，没有其他投资。负债20000元。假设客户每月收入和支出数不变。根据资料回答。客户的清偿比率为()。

幼儿园进行晨间检查时，检查者通过触摸幼儿的身体了解幼儿身体状况，这属于检查步骤中的()。

即使怀孕妇女使用爆炸物品犯罪，人民警察也不得对其使用武器。()

某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String*10 Tel As String * 20 End Type Private Sub Commandl_Click() Di

二级VB

NCRE全国计算机二级

设x为一整型变量，且情况语句的开始为：SelectCasex，则不符合语法规则的case子句是()。

窗体上有两个名称分别为Textl、Text2的文本框，一个名称为Commandl的命令按钮。设有如下的类型声明：TypePersonnameAsString*8majorAsString*20EndType当单击命令按钮时，将两个文本框

运行下列程序时，输出的结果是()。PrivateSubForm_Click()Dimxx=Array(”Software”，”and”，”Hardware”，”System”)For

设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：PrivateSubCheck1_Click(IndexAsInteger) …EndSub则下面叙述中错误的是( )。

下面有关标准模块的叙述中，错误的是( )。

下列关于控件数组的叙述中，正确的是

下列叙述中，错误的是

考生文件夹下存在一个数据库文件“samp3．accdb”，里面已经设计好表对象“tStud”，同时还设计出窗体对象“fStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计。(1)将窗体标题改为“学生查询”

下列关于算法复杂度叙述正确的是

有主体带的中、低渗透性油层，在注水开发过程中，油层主体部分()。

鸟何萃兮蘋中。萃：

哮喘缓解期肾气虚弱证的特征不包括

工程建设监理中的信息管理的内容有()。

历代帝王陵墓中“因山为穴”的是（ ）。

资料：某客户甲上年税后收入为60000元，年终结余24000元(均存入银行)。投资资产(均为股票)为26000元，没有其他投资。负债20000元。假设客户每月收入和支出数不变。根据资料回答。客户的清偿比率为()。

幼儿园进行晨间检查时，检查者通过触摸幼儿的身体了解幼儿身体状况，这属于检查步骤中的()。

即使怀孕妇女使用爆炸物品犯罪，人民警察也不得对其使用武器。()

某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String10 Tel As String 20 End Type Private Sub Commandl_Click() Di

窗体上有两个名称分别为Textl、Text2的文本框，一个名称为Commandl的命令按钮。设有如下的类型声明：TypePersonnameAsString8majorAsString20EndType当单击命令按钮时，将两个文本框

设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：PrivateSubCheck1_Click(IndexAsInteger)　　…EndSub则下面叙述中错误的是(　　)。

下面有关标准模块的叙述中，错误的是(　　)。

历代帝王陵墓中“因山为穴”的是（　）。