[单项选择题] 设执行以下程序段时依次输入2，4，6，执行结果为()。　　Dim a(4)As Integer　　Dim b(4)AS Integer　　For k=0 To 2　　　　a(k+1)=Val(InputBox("Enter data："))　　　　b(3 - k) =a(k + 1)　　Next k　　Print b(k)

A．可以随意读取随机文件中任一记录的数据
B．随机文件没有只读或只写的操作方式，随机文件只要一打开，就既可读又可写
C．随机文件的操作是以记录为单位进行的
D．随机文件的读、写操作语句与顺序文件的读写操作语句一样

参考答案： D

● 参考解析

在VisualBasic中，可以用Cls方法清除用Print方法在窗体显示的文本或图片框中显示的图形，并把光标定位到对象的左上角，所以选项D)是正确的；Cls方法不能清除用Picture属性装入的图形，所以选项B)是正确的；用Move方法可以移动控件和窗体，并可以调节对象的大小，所以选项C)不正确；Cls方法中的对象可以是窗体或图片框，如果省略对象，则清除当前窗体内显示的内容，所以选项A)正确。

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

[单项选择题] 设执行以下程序段时依次输入2，4，6，执行结果为()。 Dim a(4)As Integer Dim b(4)AS Integer For k=0 To 2 a(k+1)=Val(InputBox(&quot;Enter data：&quot;)) b(3 - k) =a(k + 1) Next k Print b(k)

相关题目:

[单项选择题] 设执行以下程序段时依次输入2，4，6，执行结果为()。　　Dim a(4)As Integer　　Dim b(4)AS Integer　　For k=0 To 2　　　　a(k+1)=Val(InputBox("Enter data："))　　　　b(3 - k) =a(k + 1)　　Next k　　Print b(k)