Err.Description
Private Sub mnuDirNew_Click()On Error GoTo errHandler
Dim str As String
str = InputBox("输入所要创建的文件夹的名称!", "新建文件夹", mFSO.GetTempName())
If str = "" Then Exit Sub
str = mFSO.BuildPath(dirList.Path, str)
mFSO.CreateFolder str '创建文件夹
dirList.Path = str '刷新文件夹列表
Exit Sub
errHandler:
MsgBox Err.Description, vbCritical, "创建文件夹错误"
End Sub
这个过程的Err.Description是什么意思