【VB路径选择】VB 浏览文件夹对话框 选择文件保存路径

最新推荐文章于 2018-04-16 15:16:40 发布
最新推荐文章于 2018-04-16 15:16:40 发布
阅读量436 收藏 1
点赞数
文章标签： python java excel 深度学习 windows
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/weixin_42319496/article/details/119373515
版权
这篇博客介绍了如何在VB中使用模块和API调用来创建一个文件夹选择对话框，允许用户选择文件保存路径。通过`GetFolder`函数结合`SHBrowseForFolder`和`SHGetPathFromIDList`函数，实现了从System32等目录选择并返回路径的功能。
摘要由CSDN通过智能技术生成

 

2011-06-17 15:07:06|  分类： 文件选择对话框 |  标签： |字号大中小 订阅

第一步：新建一个Modules，假设为Modulas1.bas
把下面的复制到Module.bas中

Public Const BIF_RETURNONLYFSDIRS = 1
Public Const BIF_DONTGOBELOWDOMAIN = 2
Public Declare Function SHBrowseForFolder Lib "shell32.dll" Alias "SHBrowseForFolderA" (LpBrowseInfo As BROWSEINFO) As Long
Public Declare Function SHGetPathFromIDlist Lib "shell32.dll" Alias "SHGetPathFromIDListA" (ByVal p

最低0.47元/天 解锁文章
bdview
关注
VB6 选择文件夹路径
weixin_30642561的博客
07-17 1070
'--------------------------------------------------------------------------------------- ' Module : ModuleFile ' Author : ROVAST ' Date : 2014-4-22 ' Purpose : 文件相关操作模块 ' Function ...
VB选择文件夹并取文件夹名
miaozk2006的专栏
02-21 865
代码如下： '引用Microsoft Shell Controls And AutomationDim ShellA As New ShellPrivate Sub Command1_Click() '建立一个按钮对象    Dim Shellb As Folder    Set Shellb = ShellA.BrowseForFolder(0, "选择文件夹", 0)    Shel...
VB 浏览并选择文件夹
08-24
像浏览文件一样浏览文件夹，能够选择文件夹。写成了一个函数放在了模块里。函数返回选择文件夹的路径。
VB实现选取文件夹路径
热门推荐
ROVAST的专栏
04-22 1万+
在VB中直接选取文件路径直接使用控件就可以实现 选取文件夹路径可以采用下述办法。   添加模块文件直接进行调用。模块内容代码 '--------------------------------------------------------------------------------------- ' Module : ModuleFile ' Author : ROV
vb 文件路径选择
姬豪杰的专栏
06-11 9866
BaseForm '----- 'BaseForm '----- '画面初期化 Private Sub Form_Load() '磁盘路径 Drive_Path = "D:" '文件夹路径 Dir_Path = "D:" '新旧文件路径 Old_filepath_txt.Text = ""
VB选择文件夹
zhangzhiwei911的专栏
04-24 1452
Set spShell = CreateObject("Shell.Application")  Set spFolder = spShell.BrowseForFolder(0, "选择目录:", 0, ssfDRIVES)  Set spFolderItem = spFolder.Self  spPath = spFolderItem.Path
VB6 纯API调用打开文件夹对话框
08-05
然而，VB6的标准控件库并不直接提供打开文件夹对话框。这时，我们可以借助API（应用程序接口）调用来实现这个功能。本文将详细介绍如何使用纯API调用在VB6中打开文件夹对话框。 API是操作系统为开发者提供的接口，...
VB打开浏览文件夹对话框
12-02
"VB打开浏览文件夹对话框"就是一个典型的用户交互功能，它允许用户通过图形界面选择指定的文件夹，从而实现文件或数据的读取、保存等操作。在VB中，我们通常使用`FolderBrowserDialog`组件来实现这一功能。 `...
调用api 浏览对话框，windows选择路径，vb完整模块
10-02
本模块主要讲解如何在VB中通过调用API函数实现“浏览对话框”功能，让用户方便地在Windows环境下选择文件夹或文件路径。 首先，我们要了解什么是API。API是一组预定义的函数、常量和类型定义，允许程序员访问操作...
VB6选择文件夹模块(完整版)
02-08
弹出式文件夹浏览对话框。 一个模块，一个函数就可调用。
VB6.0通用选择路径并遍历文件夹及子文件夹.txt
05-19
VB6.0通用遍历所选文件夹及其多重子文件夹操作，直接使用Command按钮过程可以操作，无需其他额外控件。新建一个窗体，添加一个Command1按钮，添加一个listbox控件，名称为list1，打开一个Excel空白文件（如不需要请注释相关代码）。把本文件代码复制粘贴进去，单击按钮即可弹窗提示选择文件夹。
VB6选取文件夹
04-22
VB6选取文件夹路径，内含一个通用模块和主窗体测试程序
VB 文件夹浏览选择控件
05-15
VB 文件夹浏览选择控件 你看到的文件来自：E动天下(http:/www.2e3.org)
VB6.0相对路径打开文件示例程序
03-22
可直接运行的VB6.0示例程序，实现功能：采用相对路径打开文件
VB:如何选定文件或文件夹
weixin_30807677的博客
01-26 347
Option ExplicitPrivate Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)'测试Private Sub Command1_Click() selectitem "e:\mc\mmtest.jpg" Sleep 10000 selectitem "e:\mc"End Sub Priv...
vb选择文件路径
☆永遠☆的专栏
05-16 2652
Option ExplicitPrivate Const BIF_RETURNONLYFSDIRS = 1Private Const BIF_DONTGOBELOWDOMAIN = 2Private Const MAX_PATH = 260Private Declare Function SHBrowseForFolder Lib "shell32" _    (lpbi As Brows
VB.net 想点击button获取选择文件夹的路径
fortran2005的博客
04-16 4742
VB.net  想点击button获取选择文件夹的路径，并把路径存入文本框1中。网上搜的都是添加commondialog控件，可是我只看到有button，新手求解，谢谢！
Vb2010 弹出对话框来选择文件夹路径
斜陽丅45°微笑 ら
12-31 5134
众所周知，在vb中如果是打开某一个文件的话，非常简单，使用CommonDialog组件即可轻松完成，但是他只能选择文件，之后或许选取的文件路径，而如果想要浏览文件夹，就没这么方便了。 这里介绍3个办法来实现文件夹浏览。 第一个非常简单，利用Shell对象  程序代码 '引用Microsoft Shell Controls And Automation Dim Shel
vb6选择文件夹路径
最新发布
01-11
在VB6中选择文件夹路径可以使用FileSystemObject对象的FolderSelect方法。具体步骤如下： 1. 首先，在代码编辑器中声明一个FileSystemObject对象，可以使用下面的代码进行声明： ``` Dim fso As FileSystemObject Set fso = CreateObject("Scripting.FileSystemObject") ``` 2. 创建一个按钮或其他触发选择文件夹的控件，并编写其点击事件处理程序。 3. 在点击事件处理程序中调用FolderSelect方法，让用户选择文件夹，并将选择的文件夹路径保存在变量中，示例如下： ``` Dim selectedFolder As String selectedFolder = fso.GetFolder("").Path ``` 此时弹出一个对话框让用户选择文件夹，并将选择的文件夹路径保存在selectedFolder变量中。 4. 可以根据需要对选择的文件夹路径进行后续操作，例如将路径显示在文本框中或将路径传递给其他函数进行处理。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值