Nothing

请直接使用Input 不要使用StrConv

Nothing

读入文件可以使用
Dim TextLine
Open "TESTFILE" For Input As #1   ' 打开文件。
Do While Not EOF(1)   ' 循环至文件尾。
   Line Input #1, TextLine   ' 读入一行数据并将其赋予某变量。
   Debug.Print TextLine   ' 在立即窗口中显示数据。
   Text1.Text=Text1.Text & TextLine & vbCrLf
Loop
Close #1

Nothing

如果你是要做个记事本，那么请你使用RichTextBox这个控件吧
你仔细研究这个控件吧。