| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 571 人关注过本帖
标题:我是新手,第一天学编程,希望版主给我改一下这个附件
只看楼主 加入收藏
陈铎少
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2011-5-22
结帖率:0
收藏
 问题点数:0 回复次数:6 
我是新手,第一天学编程,希望版主给我改一下这个附件
VB搜索文件附源代码的.rar (12.22 KB)



我是新手,第一天学编程,希望版主给我改一下这个附件,这个附件他搜索的盘符是可以选择的任何一个盘,我想改成程序的对应目录,比如我的VB6生成的文件名叫1.exe,然后我要搜索的是和1.exe同一个根目录下的文件夹888,帮我改一下搜888这个文件夹的代码



比如参考一下
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
ShellExecute hWnd, "open", App.Path & "\文件名", nil, nil, 1
End Sub

我百度搜索出来上面的代码是打开1.exe这个程序的相同目录下的文件夹名,我是想用这样的方法叫你帮我改一下搜索1.exe相同目录下的文件夹
搜索更多相关主题的帖子: 根目录 文件夹 
2011-05-23 00:11
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
收藏
得分:0 
以下是引用陈铎少在2011-5-23 00:11:06的发言:
我是新手,第一天学编程,希望版主给我改一下这个附件,这个附件他搜索的盘符是可以选择的任何一个盘,我想改成程序的对应目录,比如我的VB6生成的文件名叫1.exe,然后我要搜索的是和1.exe同一个根目录下的文件夹888,帮我改一下搜888这个文件夹的代码
比如参考一下
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
ShellExecute hWnd, "open", App.Path & "\文件名", nil, nil, 1
End Sub

我百度搜索出来上面的代码是打开1.exe这个程序的相同目录下的文件夹名,我是想用这样的方法叫你帮我改一下搜索1.exe相同目录下的文件夹

图片附件: 游客没有浏览图片的权限,请 登录注册

无知
2011-05-23 00:34
chengdushao
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2009-1-15
收藏
得分:0 
回复 2楼 Artless
我看不懂,我只是新手,第一天学编程,都是只是在看论坛的根本教程图文并茂的那种,基本上是不懂代码,只不过我目前也急需要一个这样的东西,所以叫版主帮我改一下,希望得到版主的帮忙,急用的

[ 本帖最后由 chengdushao 于 2011-5-23 08:16 编辑 ]
2011-05-23 08:14
xiaodu3325
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2011-5-24
收藏
得分:0 
   我也新手
2011-05-24 11:55
s523915627
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2011-5-28
收藏
得分:0 
都新手啊,,高人在哪里
2011-05-28 10:36
wube
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:23
帖 子:1820
专家分:3681
注 册:2011-3-24
收藏
得分:0 
回复 2楼 Artless
我不懂~她要程序自动搜索还是像对话开窗口手动搜索?

不要選我當版主
2011-05-28 14:20
快速回复:我是新手,第一天学编程,希望版主给我改一下这个附件
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.051955 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved