（ 35 ）设在工程文件中有一个标准模块，其中定义了如下记录类型：Type BooksName As String * 10TelNum As String * 20End Type在窗体上画一个名为 Command1 的命令按钮，要求当执行事件过程 Command1_Click 时，在顺序文件Person.txt 中写入一条 Books 类型的记录。下列能够完成该操作的事件过程是A ） Private Sub Command1_Click()Dim B As BooksOpen “ Person.txt
题目
（ 35 ）设在工程文件中有一个标准模块，其中定义了如下记录类型：
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
B.Name=InputBox( “ 输入姓名 ” )
B.TelNum=InputBox( “ 输入电话号码 ” )
Write #1,B.Name,B.TelNum
Close #1
End Sub
B ） Private Sub Command1_Click()
Dim B As Books
Open “ Person.txt ” For input As #`1
B.Name=InputBox( “ 输入姓名 ” )
B.TelNum=InputBox( “ 输入电话号码 ” )
Print #1,B.Name,B.TelNum
Close #1
End Sub
C ） Private Sub Command1_Click()
Dim B As Books
Open “ Person.txt ” For Output As #`1
B.Name=InputBox( “ 输入姓名 ” )
B.TelNum=InputBox( “ 输入电话号码 ” )
Write #1,B
Close #1
End Sub
D ） Private Sub Command1_Click()
Open “ Person.txt ” For input As #`1
Name=InputBox( “ 输入姓名 ” )
TelNum=InputBox( “ 输入电话号码 ” )
Print #1, Name, TelNum
Close #1
End Sub
相似考题
更多“( 35 )设在工程文件中有一个标准模块,其中定义了如下记录类型:Type BooksName As String * 10Tel ”相关问题
-
第1题：
在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：
记录类型定义如下：
下列叙述中正确的是（ ）。A. 记录类型animal不能在Form1中定义，必须在标准模块中定义
B. 如果文件c：\vbTest．dat不存在，则Open命令执行失败
C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D. 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中
正确答案：B
B) 【解析】本题考查随机文件的基本操作。随机文件以记录作为存储单位，以Random打开文件的格式为：Open文件名For Random As#文件号[Len=记录长度]。如果文件不存在，则打开失败。写操作格式为：Put[#]文件号，[记录号]，变量名。可以将一个记录变量的内容写到指定的记录位置处，忽略记录号，则表示在当前记录后的位置插入一条记录。读操作格式为：Get[#]文件号，[记录号]，变量名。如果忽略记录号，则读出当前记录后面的那一条记录。一般记录类型在VB中是以Type定义的自定义类型，可以在窗体和标准模块中定义。
-
第2题：
假定已经定义了一个名为arr_type的PL／SQL表类型,那么怎样实例化一个arr_type类型的变量()A.v_arr arr_type;
B.v_arr is arr_type;
C.v_arr of arr_type;
D.v_arr arr_type%type;
参考答案：A
-
第3题：
以下叙述中错误的是________。
A．全局变量可以在标准模块中定义
B．窗体和标准模块需要分别保存为不同类型的磁盘文件
C．在一个窗体文件中用Private定义的通用过程可以被其他窗体调用
D．一个工程中可以包含多个窗体文件
主函数中定义的变量是全局变量 -
第4题：
设在工程文件中有一个标准模块，其中定义了下列记录类型：
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。 -
第5题：
以下叙述中错误的是________。
A．在一个窗体文件中用Private定义的通用过程可以被其他窗体调用
B．一个工程中可以包含多个窗体文件
C．窗体和标准模块需要分别保存为不同类型的磁盘文件
D．全局变量可以在标准模块中定义
窗体的Hide方法将窗体隐藏并卸载 -
第6题：
在随机文件操作中，定义记录类型的语句（)。
A．Type…End Type
B．Dim
C．Private
D．Public
Type…End Type