UC知道关于VB图片添加问题
来源：百度知道 编辑：UC知道 时间：2024/05/21 15:59:34
我用picturebox控件，添加图片
Dim st As String
st = "xiaojj.bmp"
Picture1.Picture = LoadPicture(App.Path + "\" + st)
或者
Picture1.Picture = LoadPicture(st)
但是图片必须在应用程序的相同目录下才能显示....有什么办法能让应用程序自动搜索电脑中的所有目录并显示该图片么...我要添加很多图片,有什么办法能把图片集中到一起,而不是一张一张图片放在文件夹里呢..??高手帮下忙撒....我没学过SQL...那个不会....
Dim st As String
st = "xiaojj.bmp"
Picture1.Picture = LoadPicture(App.Path + "\" + st)
或者
Picture1.Picture = LoadPicture(st)
但是图片必须在应用程序的相同目录下才能显示....有什么办法能让应用程序自动搜索电脑中的所有目录并显示该图片么...我要添加很多图片,有什么办法能把图片集中到一起,而不是一张一张图片放在文件夹里呢..??高手帮下忙撒....我没学过SQL...那个不会....
其实，你的要求没有必要，因为你编写的东西不一定就在自己的电脑上用，如果其它电脑没有该图片那程序就会出错了
所以，把图片放到一个文件是必要的也可以用资源文件(其实过程都一样)，这样可以和成为程序的资源，和程序一起移动，而避免在其它电脑运行时出错。况且自己动搜索图片将耗费巨大的时间代价，影响程序的效率！windows自带的文件搜索搜索一个文件就要花费很长的时间！
如果真的要那样做的化，可参考以下步骤
1。获取磁盘信息 api 函数可以实现
2.分目录搜索文件
2。1搜索目录
2。1。1不是目录返回文件名 检测是否为查找文件
2。1。2 是目录 递归查找子目录
3，输出结果
很简单，用资源文件，不用放文件夹里的