下面是一个读入并显示文本文件最后一行的源程序，现在有两个问题，
1：这段程序如何修改成读入并显示文本文件倒数第二行？   
2：为什么它在文本框中显示的是乱码？

窗体中一个文本框，一个command按钮，

Private Sub Command1_Click()
Dim MaxSize     As Long
  Dim NextChar     As Long
  Dim MyStr     As String
  Dim MyChar     As String
  Open "c:\a.txt" For Input As #1                 '打开输入文件。
  MaxSize = LOF(1)           '取得文件的总字符数。
  '   用循环读入，从最后开始往前读。
  For NextChar = MaxSize To 1 Step -1
          Seek #1, NextChar           '   设置读写位置。
          MyChar = Input(1, #1)           '读入一字符。
          If MyChar = vbLf Then
                Exit For
          Else
                MyStr = MyChar & MyStr        '当前字符加在字符串前面
          End If
  Next NextChar
  Close #1         '关闭文件
  Text1.Text = MyStr
End Sub