如何遍历对话框里面的子控件

BOOL EnumWndChildCtrls(CWnd* pWnd)
{ 
 if (pWnd->GetSafeHwnd() != NULL)
 {
  CString strClassName;
  CWnd* pWndChild = pWnd->GetWindow(GW_CHILD);
  while (pWndChild != NULL)
  {
   ASSERT_VALID(pWndChild);

   TCHAR lpszClassName [MAX_CLASS_NAME + 1];
   ::GetClassName(pWndChild->GetSafeHwnd(), lpszClassName, MAX_CLASS_NAME);

   CString str;
   str.Format(L"%s",lpszClassName);
   strClassName += str + L"\n";

   pWndChild = pWndChild->GetNextWindow();
  }
  AfxMessageBox(strClassName);
  return TRUE;
 }
 return FALSE;
}