vb.net遍历窗口内所有控件的句柄类名和标题黑铁世界

vb.net资源：运用递归遍历其它程序窗口内所有控件的类名，控件的句柄，和控件的标题。所用函数有FindWindow、EnumChildWindows、GetClassName、GetWindowText、GetWindowTextLength

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2015-05-17 01:19  遍历窗口内句柄\
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\
     文件         899  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1.sln
     文件       12800  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1.suo
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\
     目录           0  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Debug\
     文件       23552  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.exe
     文件       48640  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.pdb
     文件       11600  2015-05-17 02:11  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.vshost.exe
     文件         708  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Debug\WindowsApplication1.xml
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\bin\Release\
     文件        2739  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\Form1.Designer.vb
     文件        5817  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\Form1.resx
     文件         177  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\Form1.vb
     文件        2302  2015-05-17 02:09  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\Module1.vb
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\
     文件        1519  2015-05-17 00:57  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Application.Designer.vb
     文件         510  2015-05-17 00:57  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Application.myapp
     文件        1125  2015-05-17 00:57  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\AssemblyInfo.vb
     文件        2786  2015-05-17 00:57  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Resources.Designer.vb
     文件        5612  2010-05-04 06:45  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Resources.resx
     文件        3013  2015-05-17 00:57  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Settings.Designer.vb
     文件         279  2010-05-04 06:45  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\My Project\Settings.settings
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\
     目录           0  2015-05-17 01:19  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\
     目录           0  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\Debug\
     文件        2152  2015-05-17 00:58  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\Debug\DesignTimeResolveAssemblyReferences.cache
     文件        6280  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\Debug\DesignTimeResolveAssemblyReferencesInput.cache
     文件         954  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\Debug\GenerateResource.read.1.tlog
     文件        1502  2015-05-17 02:12  遍历窗口内句柄\WindowsApplication1\WindowsApplication1\obj\x86\Debug\GenerateResource.write.1.tlog
............此处省略11个文件信息