在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明： Private Type Person name As String*8 maj

admin2020-06-30 55

问题在窗体上有两个名称分别为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语句打开文件，并为文件制定一个文件号。根据文件的的存取方式使用不同的模式打开文件。
本题是随机文件，读写的是一条一条的记录，所以用ForRandom模式打开，记录的长度为Person类型变量p的长度。
②从文件中读出数据进行处理或处理数据后，把数据写入文件。
本题是把变量的数据写入随机文件，所以用Put语句写入。
③文件操作结束，关闭文件。各种文件关闭统一用Close#文件号关闭。
综上所述，故本题选C。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明： Private Type Person name As String*8 maj

二级VB

NCRE全国计算机二级

窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click()　　DimmAsString　　m＝InputBox("请输入字符串")　　Printpick_str(m)En

设有如下一段程序：PrivateSubCommand1_Click()　　StaticaAsVariant　　a＝Array("one"，"two"，"three"，"four"，"five")　　Printa(3)EndS

用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是()。

以下关于变量作用域的叙述中错误的是(　　)。

以下关于框架的叙述中，错误的是

软件生命周期可分为定义阶段、开发阶段和维护阶段，下面不属于开发阶段任务的是

数据库技术的根本目标是要解决数据的

以下不能用形状控件画出的图形是

窗体上有一个名称为Timer1的计时器控件，一个名称为Shapel的形状控件，其Shape属性值为3(Circle)。编写程序如下：PrivateSubForm_Load()Shape1．Top=0：Timer1．Interval=100

下列关于DNA二级结构模型的叙述，正确的有

A．氮芥B．5-氟尿嘧啶C．丝裂霉素D．长春新碱E．卡铂生物碱类抗癌药

债券回购到期日，融资方只能将相应的质押券申报转回原证券账户，不可以申报继续用于债券回购交易。()

在绩效考核管理中。通过对下属员工采取惩罚的手段，以防止和克服他们绩效低下的行为，属于绩效改进策略的()

Themaninthecornerconfessedto______alietothemanagerofthecompany.

关于我国国情，下列叙述正确的是：

用导数定义求在点x＝0处的导数．

设A，B分别为m×n及n×s阶矩阵，且AB=O．证明：r(A)+r(B)≤n．

有如下程序#includemain(){inta=0,b=1;if(a++&&b++)printf("T");elseprintf("F");printf("a=%d,b=%d\n",a,b);}程序运行后

无符号二进制整数10000l0转换成十进制数是_______。

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明： Private Type Person name As String*8 maj

二级VB

NCRE全国计算机二级

窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click() DimmAsString m＝InputBox("请输入字符串") Printpick_str(m)En

设有如下一段程序：PrivateSubCommand1_Click() StaticaAsVariant a＝Array("one"，"two"，"three"，"four"，"five") Printa(3)EndS

用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是()。

以下关于变量作用域的叙述中错误的是( )。

以下关于框架的叙述中，错误的是

软件生命周期可分为定义阶段、开发阶段和维护阶段，下面不属于开发阶段任务的是

数据库技术的根本目标是要解决数据的

以下不能用形状控件画出的图形是

窗体上有一个名称为Timer1的计时器控件，一个名称为Shapel的形状控件，其Shape属性值为3(Circle)。编写程序如下：PrivateSubForm_Load()Shape1．Top=0：Timer1．Interval=100

下列关于DNA二级结构模型的叙述，正确的有

A．氮芥B．5-氟尿嘧啶C．丝裂霉素D．长春新碱E．卡铂生物碱类抗癌药

债券回购到期日，融资方只能将相应的质押券申报转回原证券账户，不可以申报继续用于债券回购交易。()

在绩效考核管理中。通过对下属员工采取惩罚的手段，以防止和克服他们绩效低下的行为，属于绩效改进策略的()

Themaninthecornerconfessedto______alietothemanagerofthecompany.

关于我国国情，下列叙述正确的是：

用导数定义求在点x＝0处的导数．

设A，B分别为m×n及n×s阶矩阵，且AB=O．证明：r(A)+r(B)≤n．

有如下程序#includemain(){inta=0,b=1;if(a++&&b++)printf("T");elseprintf("F");printf("a=%d,b=%d\n",a,b);}程序运行后

无符号二进制整数10000l0转换成十进制数是_______。

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明： Private Type Person name As String*8 maj

窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click()　　DimmAsString　　m＝InputBox("请输入字符串")　　Printpick_str(m)En

设有如下一段程序：PrivateSubCommand1_Click()　　StaticaAsVariant　　a＝Array("one"，"two"，"three"，"four"，"five")　　Printa(3)EndS

以下关于变量作用域的叙述中错误的是(　　)。