用Ribion方式的菜单。默认生成不带显示隐藏WorkSpace功能，一旦你把WorkSpace关掉，就再也找不回来了。
void CMainFrame::OnViewWorkspace()
{
ShowPane (&m_wndClassView,
   !(m_wndClassView.IsVisible ()),
   FALSE, TRUE);
RecalcLayout ();
}
 
void CMainFrame::OnUpdateViewWorkspace(CCmdUI *pCmdUI)
{
pCmdUI->SetCheck (m_wndClassView.IsVisible ());
}
 
 

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/Augusdi/archive/2010/12/13/6073140.aspx

一、问题现象
 
VC6.0和win7的兼容性不好，安装完成后直接用 File 目录下的 Open 打开已有的工程会出现 “已停止工作”的问题，软件自动退出，无法工作。具体情况如下图：
 
 
二、解决办法
 
将 FileTool.dll 文件放到vc6.0安装目录下的 AddIns 文件夹中，例如，我的 FileTool.dll 文件路径是：C:\Program Files (x86)\Microsoft Visual Studio\Common\MSDev98\AddIns（最好安装在C盘）
打开vc6.0，如下图：
 
3. 在 Tools 目录下点击 Customize出现如下对话框
 
 
4. 点击上图对话框中的 Add-ins and Macro Files ，将 File Tool Developer Studio Add-in 前面钩上，如下图：
 
 
5. 关闭vc6.0，然后重新启动软件，软件界面会出现两个按键 A 和 O （没有上述操作是不会有的，前面的截图有是因为我完成了所有的操作）
 
 
6. 之后的使用，用 O 来完成打开的操作，A 完成增加到工程的操作就不会出现软件工作停止的问题，当然如果继续使用File目录下的Open来打开文件，还是会出现工作停止的问题。
 
7. 上述过程中我所用的软件安装包和 FileTool.dll 文件见链接：https://download.csdn.net/download/mr_chunyz/10618875

 
 
BOOL DeleteExcelSheet(CString sExcelFilePath, CString sSheetName)
 {
 
 
   _Worksheet m_wsExcelSingle;
  Worksheets m_wsExcels;
  _Workbook m_wbExcelSingle;
  Workbooks m_wbExcels;
  _Application m_appExcel;
 
 

   //创建Excel 2000服务器(启动Excel) 
  if (!m_appExcel.CreateDispatch("Excel.Application",NULL)) 
  {
   MessageBox(NULL,"创建Excel服务失败!","提示",MB_OK|MB_ICONWARNING);
   return FALSE;
  } 
  m_appExcel.SetVisible(false); 
  m_appExcel.SetAlertBeforeOverwriting(FALSE);//禁用覆盖提示
  m_appExcel.SetDisplayAlerts(FALSE);//禁止显示警告提示
 
 
 m_wbExcels.AttachDispatch(m_appExcel.GetWorkbooks(),true); 
  m_wbExcelSingle.AttachDispatch(m_wbExcels.Add(_variant_t(sExcelFilePath)));
  //得到Worksheets 
  m_wsExcels.AttachDispatch(m_wbExcelSingle.GetWorksheets(),true);
  m_wsExcelSingle.AttachDispatch(m_wsExcels.GetItem(_variant_t(sSheetName)),true);
 
 
 
 
 
//我在测试时此处已注释部份不用要也成功，如果不成功则加上
  /*m_rangeExcel.AttachDispatch(m_wsExcelSingle.GetUsedRange(), TRUE);
  
  m_rangeExcel.Clear();
 
 
 m_wbExcelSingle.SaveAs( COleVariant(sExcelFilePath),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   0,
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing));
 */
 
 

     m_wsExcelSingle.Delete();
 
 
 m_wbExcelSingle.SaveAs( COleVariant(sExcelFilePath),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   0,
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing),
   _variant_t(vtMissing));
 
 
 //释放对象 
  
  //COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR); 
  //m_wbExcelSingle.Close( covOptional, COleVariant( sExcelFilePath ), covOptional );
  //m_wbExcels.Close();
  //m_rangeExcel.ReleaseDispatch(); 
  m_wsExcelSingle.ReleaseDispatch(); 
  m_wsExcels.ReleaseDispatch(); 
  m_wbExcelSingle.ReleaseDispatch(); 
  m_wbExcels.ReleaseDispatch(); 
  m_appExcel.ReleaseDispatch(); 
  m_appExcel.Quit();
 
 
 return TRUE;
 }
 

VC获得桌面工作区与任务栏大小

 

 1、全屏显示

 int full_x = GetSystemMetrics(SM_CXSCREEN);

 int full_y = GetSystemMetrics(SM_CYSCREEN);

 ::SetWindowPos(hWnd,HWND_TOPMOST,0,0,full_x,full_y,0 );

  

 

 2、工作区显示

   RECT rt;

   SystemParametersInfo(SPI_GETWORKAREA,   0,   &rt,   0) ;   // 获得工作区大小

   ::SetWindowPos(hWnd,HWND_TOPMOST,0,0,rt.right,rt.bottom,0 );

 

 3、任务栏

    全屏幕减去工作区就是任务栏啦，

  CRect   rect; 

  HWND hwnd=  ::FindWindow("Shell_TrayWnd", "");     // 调用Findwindow函数，返回窗口指针

  CWnd *pWnd = CWnd::FromHandle(hwnd);

  pWnd->GetWindowRect(&rect);