[填空题] 在窗体上画一个命令按钮,然后编写如下代码:Private Type Record R_ID As Integer R_Name As String * 20Ene TypePr

[填空题] 在窗体上画一个命令按钮,然后编写如下代码:Private Type Record R_ID As Integer R_Name As String * 20Ene TypePr,第1张

[填空题] 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record R_ID As Integer R_Name As String * 20 Ene Type Pr

[填空题] 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record R_ID As Integer R_Name As String * 20 Ene Type Private Sub Commandl_Click( ) Dim M _Sise, N_Char, M_Char Open" c: file. txt" For Input As #1 M_sise=LOF(1) For N_Char = M_Sise To 1 Step - 1 Seek#1, Next Char M_char = Input(1 ,#1) Next Print EOF(1) Close#1 End Sub 程序运行后,单击命令按钮,其输出结果为 【15】

正确答案:

False

参考解析:

[命题目的] 考查考生对文件 *** 作语句的掌握情况。[解题要点] 本题的难点是:如伺确定文件的指针是否指在文件的末尾处。Seek语句把相应文件的文件指针由后向前移动,当循环结束时,文件指针在文件的开始处,所以EOF(1)为False。[考点链接] 文件指针的定位、读取文件等

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zaji/5603168.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-12-15
下一篇 2022-12-15

发表评论

登录后才能评论

评论列表(0条)

保存