我需要做个程序，但不知如何入手，需要哪些控件？请各位帮忙指点一下，最好发些代码那就更好了！再下先谢谢了！

题目：
文件管理器
1．功能：文件操作（移动、复制、删除、更名），文件夹操作（建立、移动、复制、删除、更名）。
2．要求：界面有菜单、快捷菜单等。

以下是文件夹的操作.

****************移动文件夹************************
1、添加引用"microsoft    scripting    runtime"
2、使用方法   
Option    Explicit   
Private    Sub    Form_Load()   
Dim    FileSys    As    New    FileSystemObject   
Dim    FolderObj    As    Folder   
Set    FileSys    =    CreateObject("scripting.filesystemobject")   
FileSys.CopyFile    "c:\ss.txt",    "d:\mm.txt",    True'拷贝文件
FileSys.CopyFolder    "c:\1",    "d:\2",    True'拷贝文件夹
End sub
***************新建文件夹**************************
Dim   fso   As   New   FileSystemObject,   fdr   As   Folder,fdrPath   as   String   
  fdrPath="C:\newfolder"   
  fdr   =   fso.CreateFolder(fdrPath)
***************重命名文件夹***************
Dim   aa   As   New   Scripting.FileSystemObject   
  aa.MoveFolder   "c:\1",   "c:\2"
 **************************************************
fileName = "c:\dzh\export\1001A1AA.XLS"
If Dir(fileName) = "" Then     '文件存在
    sWenJJ_MingC = "000001"
Else
    sWenJJ_MingC = "000002"
End If
      
pathName = "c:\dzh\dataFX\" & sWenJJ_MingC
fso.MoveFolder "c:\dzh\export", pathName     '文件夹剪切，重命名
fso.CreateFolder "c:\dzh\export"     '新建文件夹

使用Dir后再使用fso.MoveFolder会产生错误！

If fso.FileExists(fileName) = False Then
     sWenJJ_MingC = "000001"
Else
    sWenJJ_MingC = "000002"
End If

改为以上代码判断文件是否存在即可解决问题。

另外，若dir使用很多修改不便的话可换另一方法，

先新建一个文件夹mkdir()，

再将原文件夹里面的东西全考到新文件夹即可。

以下是文件操作:

1、建立和删除目录
　　你可以用MKDIR语句建立一个新目录，可以用RMDIR语句删除一个目录。下面是一个例子：
　　　mkdir"c:\data"
　　　rmdir"c:\data"
2、改变当前目录：
　 可用CHDIR改变当前目录为指定目录，例如：
   CHDIR"C:\WINDOWS"
      如果想改变当前目录为应用程序所在的目录，可以使用APP.PATH实现，例如：
   chdirapp.path
3、拷贝、移动文件
   可以用filesystemobject拷贝文件，该对象提供计算机文件系统的访问权限和类似copyfile的拷贝文件的方法。该方法使用的语法为：
   filesystemobject.copyfilesource,destination[,overwrite]
      source是源文件（包含路径）
　 destination是目标文件，亦包含路径
   overwrite是布尔值，如果是真则意味着要覆盖已存在的目标文件
使用这个对象之前必须先建立它，方法如下：
   DimFileSystemObjectAsObject
　 SetFileSystemObject=CreatObject("Scripting.FileSystemObject")
　 FileSystemObject.CopyFile"c:\file1.txt","c:\file2.txt"
      CopyFile是一个方法，其作用是将源文件复制到目标位置，它的两个参数分别是源文件和目标文件的路径，另外可以使用的方法有MoveFile和DeleteFile，分别用来移动和删除一个文件，它们的使用方法如下：
   FilesyStemObject.MoveFile"c:\file1","d:\file1"
　 FileSystemObject.DeleteFile"c:\text.txt"