本人是自学VB的，昨天按网上说明方法做了一个记事本，但出现上一些问题，希望大家能帮我看一下是不是我的操作失误引起的。
这是我的：
Option Explicit
    Dim sFind As String
    Dim FileType, FiType As String
    
Private Sub Form_Load() '加载记事本大小
    Me.Height = 6000
    Me.Width = 9000
End Sub

Private Sub Form_Resize() '设置文本框大小
    On Error Resume Next
    RichTextBox1.Top = 20
    RichTextBox1.Left = 20
    RichTextBox1.Height = ScaleHeight - 40
    RichTextBox1.Width = ScaleWidth - 40
End Sub

    [color=FFFF00]Private Sub mnuNew_Click() [/color]'新建
    RichTextBox1.Text = ""
    [color=FF0000]FileName[/color] = "未命名"
1、这里在运行的时候通不过，错误为：编译失误，变量未定义。可是我按照源代码写的，不知道为什么会错，后来我加上一个声明：Dim FileName As String 就可以通过了。
    Me.Caption = FileName
    End Sub

Private Sub mnuOpen_Click() '打开
    CommonDialog1.Filter = "文本文档(*.txt)|(*txt)|RTF文档(*rtf)|(*rtf)|所有文档(*.*)|(*.*)"
    CommonDialog1.ShowOpen
    RichTextBox1.Text = ""
    FileName = CommonDialog1.FileName
    RichTextBox1.loadfile FileName
    Me.Caption = "超级记事本：" & FileName
End Sub
2、上面加Dim FileName As String这个声明之后，在运行时按“打开”，它不显示有.txt、.rtf格式的文档的，不知道什么希望各位帮我看看。3Q