谁能帮我介绍一下这段代码

Question

看到一段代码有如下两个地方不懂请帮我介绍一下OK?最好说详细一点,我刚学VB
Private Sub mnuFileSave_Click()
    Dim sFile As String
    If TypeOf Me.ActiveForm Is frmDocuments Then
        With dlgCommonDialog
            .DialogTitle = 保存"
            .CancelError = False
            .Filter = "ËùÓÐÎļþ (*.*)|*.*"
            .ShowSave
            If Len(.FileName) = 0 Then
                Exit Sub
            End If
            sFile = .FileName
        End With
        frmDocuments.OLE1.SaveToFile dlgCommonDialog.FileName '这里不懂
        SaveSetting "wlf", "DM", "date", Date   '这里也不懂
    End If
End Sub

Answer 1

SaveSetting 语句在 Windows 注册表中保存或建立应用程序项目。语法SaveSetting appname, section, key, settingSaveSetting 语句的语法具有下列命名参数：部分 描述 appname 必要。字符串表达式，包含应用程序或工程的名称，对这些应用程序或工程使用设置 
section 必要。字符串表达式，包含区域名称，在该区域保存注册表项设置。 
key 必要。字符串表达式，包含将要保存的注册表项设置的名称。 
setting 必要。表达式，包含 key 的设置值。 
说明如果无论如何也不能保存注册表项设置，则将导致错误发生。

Answer 2

frmDocuments.OLE1.SaveToFile dlgCommonDialog.FileName 我还是不大明白
就是那个frmDocuments.OLE1不知道具体含义

Answer 3

frmDocuments应该是窗体，ole1是窗体上的控件

Answer 4

SaveToFile 方法
      将对象保存到数据文件中。不支持命名的参数。语法object.SaveToFile filenumberSaveToFile 方法的语法包含下面部分：部分 描述 
Object 对象表达式，其值是“应用于”列表中的一个对象。 
Filenumber 必要的。数值表达式，指定用于保存对象的文件号。这个号必须与一个打开的二进制文件相对应。 
说明使用这个方法可以保存 ActiveX 部件。为了将 ActiveX 部件按 OLE version 1.0 版本的格式保存，可用 SaveToOle1File 方法来代替。如果对象是链接的 (OLEType = vbOLELinked, 0)，只将链接信息及数据图象保存到指定的文件中。对象的数据则由创建该对象的应用程序来维护。如果对象是嵌入的 (OLEType = vbOLEEmbedded, 1)，则对象的数据由 OLE 容器控件维护，并可由 Visual Basic 应用程序保存。可用 ReadFromFile 方法加载保存到数据文件中的对象。