我是初学者，在调试一下程序时，“清除”键可以使用。“确定”键使用时提示：“编译错误：变量未定义”（显示有问题的变量是LblID）不明白是什么原因，请高手解答，谢谢！程序如下：
Option Explicit
'--------------------------------------
'           TextBox的常用属性的例子
'--------------------------------------
'           洪恩在线 求知无限
'--------------------------------------
'------名称-------------作用------------
'       CmdClear        清除文本框内容按钮
'       TextAll         文本框
'       CmdOK           给窗体FormBack的TextAll文本框赋值
'       FormTextBox     主窗体
'--------------------------------------
'--------------------------------------
'————文本框名称————属性设置———
'
'       TextPassWord    PassWordChar为 *
'       TextResume      Multiline为Ture, ScrollBars为2 -Vertical
'       TextAll         Multiline为Ture, ScrollBars为2 -Vertical
'                       Appearance为0 - Flat
'--------------------------------------


Private Sub CmdClear_Click()

    '清除所有文本框中的内容
    TextID.Text = ""
    TextPassWord.Text = ""
    TextName.Text = ""
    TextMail.Text = ""
    TextResume.Text = ""
    
End Sub

Private Sub CmdOK_Click()
    '把FormTextBox文本框的Text及标签的Caption赋给
    '窗体FormBack中TextAll文本框的Text属性
    Load Formback               '载入窗体Formback
    Formback.TextAll.Text = LblID.Caption & "   " & TextID.Text _
                            & vbNewLine & _
                            LblPassWord.Caption & "   " & TextPassWord.Text _
                            & vbNewLine & _
                            LblName.Caption & "   " & TextName.Text _
                            & vbNewLine & _
                            LblMail.Caption & "   " & TextMail.Text _
                            & vbNewLine & _
                            LblResume.Caption & "   " _
                            & vbNewLine & TextResume.Text
                                
                                '其中vbNewline是使TextAll.Text换行显示
   
    Formback.Show               '显示窗体Formback
    FormTxtBox.Visible = False '设置窗体FormtextBox不可见
        
End Sub



Private Sub Command1_Click()

End Sub

Private Sub Command2_Click()

End Sub

Private Sub Text1_Change()

End Sub