CommonDialog变量在VS 2008中被另外几个变量取代，而实例一中的此变量的CancelError属性功能在VS 2008下应该使用ShowDialog变量代替对吧？我把代码修改如下，但ShowDialog那总提示出错说：表达式是一个值，因此不能作为赋值目标。请问这是什么原因？我应该怎么写才对？

    Private Function OpenFrm() As String
        With OpenFileDialog1                                          '针对OpenFileDialog控件执行操作
            OpenFileDialog1.Title = "打开"                            '设置对话框的名称
            .ShowDialog = Windows.Forms.DialogResult.Cancel
            .Filter = "窗体文件 (*.frm)|*.frm|所有文件 (*.*)|*.*"     '设置OpenFileDialog1控件的标识和属性
            .ShowDialog()                                             '显示打开对话框
            If Len(.FileName) = 0 Then                                '如果文件路径为空
                Exit Function                                         '结束过程
            End If
            OpenFrm = .FileName                                       '给函数赋返回值
        End With
    End Function