[填空題] 編寫一個過程把C盤中的Config. sys文件內(nèi)容讀出，并在文本框中顯示出來。在窗體Form1建立一個文本框Text1，將其MultiLine屬性設(shè)置為True,將ScrollBars屬性設(shè)置為3-Both。根據(jù)題意。請完善下列程序。 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#語句的功能是從一個打開的順序文件中，讀出一行數(shù)據(jù)賦給一個字符型變量chl；FreeFile函數(shù)的功能是以整數(shù)形式返回Open語句可以使用的下一個有效文件號；EOF函數(shù)的功能是當文件指針到達文件尾部時返回True，否則返回False。