在窗体上画一个命令按钮，然后编写如下代码： Private Type RecordR_ID As IntegerR_Name As Strin

在窗体上画一个命令按钮，然后编写如下代码：

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

Seek1, Next Char

M_char = Input(1 ,1)

Next

Print EOF(1)

Close1

End Sub

程序运行后，单击命令按钮，其输出结果为【 】。