2.0
3.0
>
comp
>
gb.form.dialog
>
dialog
>
selectdirectory
前一个
下一个
编辑
重命名
撤销
刷新
搜索
管理
文档
历史
Dialog.SelectDirectory (gb.form.dialog)
Static
Function
SelectDirectory
(
)
As
Boolean
调用标准文件对话框,获得一个已经存在的目录名。
如果用户点击“取消”按钮,返回
TRUE
。 如果用户点击“确定”按钮,返回
FALSE
。
该示例列出用户选择的目录下的所有文件。如果用户取消对话框,无列表显示。
Example
PUBLIC SUB ButtonDirectory_Click()
DIM fileName AS String
IF Dialog.SelectDirectory() THEN RETURN
FOR EACH fileName IN Dir(Dialog.Path)
PRINT Dialog.Path &/ fileName
NEXT
END