在网上超找很久才找到解决窗口遍历的问题还有一些输入的错误也进行改正以下程序在VB6 通过希望能给大家有所帮助OK VB上建立按钮学过的人都了解正式代码如下Option ExplicitPrivate Const SWP_NOSIZE = H1Private Const SWP_NOMOVE = H2Private Const SWP_NOZORDER = H4Private Const SW