[填空题] 编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本框Text1,将其MultiLine属性设置为True,将ScrollBars属

[填空题] 编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本框Text1,将其MultiLine属性设置为True,将ScrollBars属,第1张

[填空题] 编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本框Text1,将其MultiLine属性设置为True,将ScrollBars属

[填空题] 编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本框Text1,将其MultiLine属性设置为True,将ScrollBars属性设置为3-Both。根据题意。请完善下列程序。 option Explicit Private Sub Form C1ick() Dim chl As String, fn As Integer Dim Str As String fn= 【13】 Open "C:Config. sys" For Input As fn Do While Not EOF( 【14】 ) Line Input #fn, chl Str=Str+chl+vbCrLf Loop Text1. Text= 【15】 End Sub

正确答案:

[13]FreeFile [14]fn [15]Str解析:[分析]: Line Input#语句的功能是从一个打开的顺序文件中,读出一行数据赋给一个字符型变量chl;FreeFile函数的功能是以整数形式返回Open语句可以使用的下一个有效文件号;EOF函数的功能是当文件指针到达文件尾部时返回True,否则返回False。

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

原文地址: https://outofmemory.cn/zaji/5469479.html

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

发表评论

登录后才能评论

评论列表(0条)

保存