A-A+

设在工程文件中有一个标准模块 其中定义了下列记录类型:Type BooksName As S

2022-08-06 05:39:43 问答库 阅读 176 次

问题详情

设在工程文件中有一个标准模块,其中定义了下列记录类型:
Type Books
Name As String*10
TelNum As String*20
End,Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1 Click 时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是()。
A.Private Sub Command1 Click()
Dim B AS Books
Open"Person txt"For Output As#1
Name=InputBox(”输入姓名”)
relNum=lnputBox(”输入电话号码”)
Wlite#1 B Name,B TelNum
Ch,se#1
End Sub
B.Private Sub Command1 Click()
Dim B AS Books
Open"Person txt"For Input As#1
>Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Print#1,B.Name,B.TelNam
Close#1
End Sub
C.Private Sub Command1 Click()
Dim BAS Books
Open"Person txt"For Output As#1
Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Write#1,B
Close#1
End Sub
D.Private Sub Commandl Click()
Open"Person txt"For Input As#1
Name=lnputBox("输入姓名")
TelNum=lnputBox("输入电话号码")
Prim#1 Name TelNum
Close#1
End Sub请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:A
A。【解析】Type语句用于在模块级别(过程外的任何代码都被看作模块级别代码,必须先列出声明,随后列出过程)中定义一个用户自己的数据类型,本质上是一个数据类型集合,它含有一个至一个以上的成员。每个成员可以被定义为不同的数据类型。当声明自定义类型变量后,可通过“变量名.成员名”来访问自定义变量中的元素。VisualBasic程序中关于文件的操作,主要是先打开一个文件,然后对这个文件进行读或写的操作,操作完成后,关闭这个文件。打开文件的基本格式为:OpenFileNameForModeAs#FileNumber。打开方式主要有Output、Append、Input、Random等几种,Output、Append、Input方式打开的文件进行的读写操作都是以顺序方式进行的,其中Output、Append打开的文件主要用来输出数据,与Print#、Write#等方法配合使用;以Input方式打开的:(件主要用来读入数据,它与Input#、LineInput#语句配合使用。本题中,选项B和选项D均是以Input方式打开文件,显然错误,选项C中向顺序文件中写入记录的语句错误,正确答案只有选项A。

考点:模块,定义