VB6 如何检测U盘的插入、弹出和U盘内所有文件名

就如同先打开程序  插入U盘

之后程序中的 Text1=2011年10月16日0时10分34秒 USB磁盘被插入，盘符:J

Text2=U盘中所有文件的文件名


。。。。求代码=_,= 各种球 同求... HOOK系统U盘插入的消息就行了。
U 盘的插入，可以利用 OnDeviceChange 消息。它有点像 VB 中的事件。

你在其中枚举 U 盘即可。这个过程在 Vb 中比较难搞，我一般是用 DLL 来做。

枚举到 U 盘的盘符之后，访问文件就简单了。
期待更详细的解答 建议用DLL来做，我做过一个类似的，监控驱动器的变化，一旦发生变化，就写入日志，写入内容包括日期，时间，品牌，型号，序列号，但是没有枚举U盘驱动器里面文件的功能。

补充：VB ,  API