文件对话框多选

Fn GetMutiOpenFileName Title:"Select Files" FileFilter:"All Files (*.*)|*.*" = (
 local OpenFileDialog,OpenFileResult OpenFileDialog = DotNetObject "System.Windows.Forms.OpenFileDialog"
 OpenFileDialog.title = Title
 OpenFileDialog.Multiselect = true
 OpenFileDialog.Filter = FileFilter
 OpenFileDialog.FilterIndex = 1
 OpenFileResult = OpenFileDialog.ShowDialog()
 if OpenFileResult.Equals OpenFileResult.OK then (
 OpenFileDialog.FileNames 
 ) else Undefined 
)
 c=GetMutiOpenFileName()

猜你喜欢

转载自www.cnblogs.com/humd/p/12110026.html