Ant*_*Ant 20
这个问题中有一些示例代码.引用:
在VB6中,添加组件:
现在在表单上,从工具箱中添加新的Common Dialog控件
在代码中,您需要:
CommonDialog1.Filter = "Apps (*.txt)|*.txt|All files (*.*)|*.*"
CommonDialog1.DefaultExt = "txt"
CommonDialog1.DialogTitle = "Select File"
CommonDialog1.ShowOpen
'The FileName property gives you the variable you need to use
MsgBox CommonDialog1.FileName
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
72165 次 |
| 最近记录: |