本文介绍在CorelDRAW VBA
中使用官方原生工具CorelScriptTools
调用文件对话框,选择文件并获得文件路径的VBA代码。其提供的GetFileBox
方法可用来打开文件对话框(或者另存为对话框)。
CorelScriptTools
CorelScriptTools
是Corel官方提供的一个脚本工具,可以用来执行很多有用的操作。比如GetFileBox
方法就可以用来打开获取文件的对话框,用户选择文件后会返回文件的路径。
GetFileBox 打开文件对话框
该函数用来打开文件对话框,并返回文件路径。它显示一个标准的Windows
文件打开(或另存为)对话框。这两个对话框都允许用户从文件系统中选择一个文件。
如果用户选择了取消,则返回空字符串。GetFileBox
语句本身不打开或保存文件,它只返回与所选文件对应的字符串。
语法
Function GetFileBox(Optional ByVal Filter As String = "All Files (*.*)|*.*", Optional ByVal Title As String = "", Optional ByVal Type As Long =