Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于OpenFileDialog指定位置


  共有3219人关注过本帖树形打印复制链接

主题：关于OpenFileDialog指定位置
帅哥哟，离线，有人找我吗？
裴保民
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2001 积分：12731 威望：0 精华：0 注册：2017/4/3 15:01:00 		关于OpenFileDialog指定位置  发帖心情 Post By：2019/9/2 9:40:00 [只看该作者]

怎样设置当打开OpenFileDialog后如果文件存在就指定到该文件名上？
[此贴子已经被作者于2019/9/2 9:41:06编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/9/2 10:03:00 [只看该作者]

dlg.filename = “xxx文件名”

 回到顶部
帅哥哟，离线，有人找我吗？
裴保民
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2001 积分：12731 威望：0 精华：0 注册：2017/4/3 15:01:00 		  发帖心情 Post By：2019/9/2 10:22:00 [只看该作者]

怎么不选中要指定的文件呢？意思是打开文件夹后直接指定该文件并处于选中状态
[此贴子已经被作者于2019/9/2 10:42:36编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/9/2 10:59:00 [只看该作者]

dlg.InitialDirectory = "xxx文件所在的目录"
dlg.filename = “xxx文件名”
 回到顶部
帅哥哟，离线，有人找我吗？
裴保民
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2001 积分：12731 威望：0 精华：0 注册：2017/4/3 15:01:00 		  发帖心情 Post By：2019/9/2 12:05:00 [只看该作者]

Dim dlg As New OpenFileDialog
'dlg.Filter= "文件|*.jpg|文件|*.png" '设置筛选器
dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif;*.png" '设置筛选器
dlg.InitialDirectory = ProjectPath  & "图片/" 

dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
    OutPut.Show("你选择了" & dlg.FileNames.Length & "个文件, 分别是:")
    For Each fl As String In dlg.FileNames
        Output.Show(fl)
    Next
End If
dlg.filename = "1.jpg"

对吗？怎么不选中"1.jpg"呢？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/9/2 12:13:00 [只看该作者]

Dim dlg As New OpenFileDialog
'dlg.Filter= "文件|*.jpg|文件|*.png" '设置筛选器
dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif;*.png" '设置筛选器
dlg.InitialDirectory = ProjectPath  & "图片/" 
dlg.filename = "1.jpg" 放到这里
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
 回到顶部
帅哥哟，离线，有人找我吗？
裴保民
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2001 积分：12731 威望：0 精华：0 注册：2017/4/3 15:01:00 		  发帖心情 Post By：2019/9/2 12:37:00 [只看该作者]

Dim dlg As New OpenFileDialog
'dlg.Filter= "文件|*.jpg|文件|*.png" '设置筛选器
dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif;*.png" '设置筛选器
dlg.InitialDirectory = ProjectPath  & "图片/" 
dlg.filename = "1.jpg" 
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
  OutPut.Show("你选择了" & dlg.FileNames.Length & "个文件, 分别是:")
    For Each fl As String In dlg.FileNames
        Output.Show(fl)
    Next
End If

运行后怎么不选中文件呢？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/9/2 13:38:00 [只看该作者]

只要指定目录存在这个文件，点击确定按钮后，dlg.FileNames肯定会包含这个文件。

如果是指使用鼠标点击文件的选中效果，这个是不可能做到的
[此贴子已经被作者于2019/9/2 13:38:02编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
裴保民
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：2001 积分：12731 威望：0 精华：0 注册：2017/4/3 15:01:00 		  发帖心情 Post By：2019/9/2 14:33:00 [只看该作者]

是指使用鼠标点击文件的选中效果，怎么实现呢？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/9/2 15:06:00 [只看该作者]

仔细看8楼

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04346 秒, 4 次数据查询