知道父窗口句柄和当前窗口类名，如何获取当前窗口句柄？

如：
cHwnd = FindWindowEx(bHwnd, ByVal 0&, "static ", vbNullString)
Debug.Print cHwnd
If cHwnd <> 0 Then
dHwnd = FindWindowEx(cHwnd, ByVal 0&, "RICHEDIT ", ss) '文本编辑框的句柄
' tHwnd = FindWindow( "RICHEDIT ", ss)
Debug.Print dHwnd

句柄CHwnd知道，如何获取控件RICHEDIT的句柄dHwnd?
RICHEDIT控件的标题文本ss是不断变化的！

[解决办法]
dHwnd = FindWindowEx(cHwnd, ByVal 0&, "RICHEDIT ", vbnullstring) '文本编辑框的句柄
[解决办法]
dHwnd = FindWindowEx(cHwnd, ByVal 0&, "RICHEDIT ", vbnullstring) '文本编辑框的句柄
如果这个不行,就说明这个文本框还有父窗口,这样的话就要一层一层的找咯:
BHwnd = FindWindowEx(cHwnd, dHwnd, "RICHEDIT ", vbnullstring) '从这个窗口开始查找下一个子窗口