[单项选择题] 某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String * 10 Tel As String * 20 End Type Private Sub Command1_Click( ) Dim p As RType p. Name = InputSox( "姓名" ) p. Tel = InputBox( "电话号" ) Open "Books. dat" For Ra

A．在类型定义“TypeRType”之前加上“Private”
B．DimPAsRType必须置于窗体模块的声明部分
C．应把Open语句中的ForRandom改为ForOutput
D．Put语句应该写为Put#1,P.Name,P.Tel

参考答案： A

● 参考解析

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

当前位置：IT认证＞BASIC题库

相关题目: