[填空题] 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record R_ID As Integer R_Name As St
2021-07-20
[填空题] 在窗体上画一个命令按钮,然后编写如下代码:
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。[考点链接] 文件指针的定位、读取文件等
词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。