Dim strPath As String strPath = Trim(txtPath.Text) If InStrRev(txtPath, ".") = 0 Then MsgBox "文件路径错误", vbOKOnly + vbExclamation, "提示" Exit Sub End If
7,763
社区成员
197,609
社区内容
加载中
试试用AI创作助手写篇文章吧