郑州大学vb上机考试试题真题 下载本文

郑州大学vb上机考试试题真题

49、设有语句Open \For Input As #2,以下叙述中,错误的是( )。(1分)

B、该语句可以在\下创建一个名为Datafile.txt的文件

C、执行该语句后可以从文件Datafile.txt中读取数据

A、该语句以文件号2打开文件

D、如果\文件不存在,系统显示出错信息

50、D盘根目录有一个名为StuD.dat的顺序文件,如要把数据追加到StuD.dat末尾,应先使用( )语句打开它。(1分)

A、

Open \For Input As #1

C、

B、

Open \For Append As #1

D、

Open \For Append As #513 Open \For Output As #1

Dim a(1 To 10000), i&, n&

Open \

'For i = 1 To 10000 'Input #1, a() 'Next n = 0

For i = 1 To 3 Input #1, a(i) Next

For i = 1 To 10 Input #1, a(i)

If Right(a(i), 1) = \

n = n + 1 End If Next Print n Close

9 / 9