VB高手 速速进来啊 谢谢了

Question

我想要的操作结果是：
进入folderform界面，选择一个文件夹。然后退出folderform界面，进入temform界面，使得选中文件夹中的图片在temform界面可以展示我所做的操作是：在类模块中： 
通用  声明  中的操作是  Public sR As String, filename As String  '目的是声明filename是全局变量在folderfrom中的操作是：Public Function formatPath(filename As String) As String
    formatPath = filename
    If Right(filename, 1) <> "\" Then formatPath = filename & "\"
End Function                                                     '目的是定义读取文件夹地址的函数filename = formatPath(dirSource.List(dirSource.ListIndex))
Text1.Text = filename                                           ‘目的是观察所读的路径是否是自己想要的文件夹得路径，显示的结果是正确的在temfolder中的操作是：
Pic2.Picture = LoadPicture(filename & "temface1.jpeg")我所做的：
我在temfolder中设置一个文本读取filename，发现filename是空的，也就是说filename没有接受到地址。想麻烦你帮忙解决一下如何才能让temfolder接受filename呢？谢谢了 
问题补充：
最好能帮我改一下代码  整完整点的  呵呵 真心的谢谢啊 

Answer 1

乱了 根本没必要弄得那么麻烦
楼主说的类模块指的是folderfrom吗？
直接在folderfrom里取得文件夹名myFld
然后直接就可以操作temfolder.Pic2.Picture = LoadPicture(filename & "temface1.jpeg")

Answer 2

使用CommonDialog控件来实现选择文件的功能。

Answer 3

同意楼上的，选择文件为什么不用CommonDialog控件呢？