工控编程吧

标题: 上位机MFC实现Excel读写带漂亮气泡提示源代码 [打印本页]

---

作者: qq263946146    时间: 2019-10-7 22:32
标题: 上位机MFC实现Excel读写带漂亮气泡提示源代码

(, 下载次数: 0)

上传

点击文件名下载附件
例程界面如上。
可以对C盘xls文件进行读写操作。
鼠标移动按钮控件，也会显示气泡提示文本。
下面是部分控件源代码：

1. 
   
2. //////////////////////////////////////////////////////////////////////////////
   
3. //名称：OnOK
   
4. //功能：读取指定Excel文件内容
   
5. //日期：2003.5.1
   
6. ///////////////////////////////////////////////////////////////////////
   
7. void CExcelAccessDlg::OnOK()
   
8. {
   
9.         CSpreadSheet SS("c:\\Test.xls", "TestSheet");
   
10. 
    
11.         CStringArray Rows, Column;
    
12. 
    
13.         //清空列表框
    
14.         m_AccessList.ResetContent();
    
15.         for (int i = 1; i <= SS.GetTotalRows(); i++)
    
16.         {
    
17.                 // 读取一行
    
18.                 SS.ReadRow(Rows, i);
    
19.                 CString strContents = "";
    
20.                 for (int j = 1; j <= Rows.GetSize(); j++)
    
21.                 {
    
22.                         if(j == 1)
    
23.                                 strContents = Rows.GetAt(j-1);
    
24.                         else
    
25.                                 strContents = strContents +  " --> " + Rows.GetAt(j-1);
    
26.                 }
    
27. 
    
28.                 m_AccessList.AddString(strContents);
    
29.         }
    
30. 
    
31.         SS.DeleteSheet();
    
32. }
    
33. 
    
34. //////////////////////////////////////////////////////////////////////////////
    
35. //名称：OnWriteexcel
    
36. //功能：新建并写入Excel文件内容
    
37. //日期：2003.5.1
    
38. ///////////////////////////////////////////////////////////////////////
    
39. void CExcelAccessDlg::OnWriteexcel()
    
40. {
    
41.         // 新建Excel文件名及路径，TestSheet为内部表名
    
42.         CSpreadSheet SS("c:\\Test.xls", "TestSheet",true);
    
43. 
    
44.         CStringArray sampleArray, testRow;
    
45.        
    
46.         SS.BeginTransaction();
    
47.        
    
48.         // 加入标题
    
49.         sampleArray.RemoveAll();
    
50.         sampleArray.Add("姓名");
    
51.         sampleArray.Add("年龄");
    
52.         sampleArray.Add("年龄1");
    
53.         SS.AddHeaders(sampleArray);
    
54.        
    
55.         // 加入数据
    
56.         CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"};
    
57.         CString strAge[]  = {"27","23","28","27","26"};
    
58.         CString strAge1[]  = {"27","23","28","27","26"};
    
59.         for(int i = 0; i < sizeof(strName)/sizeof(CString); i++)
    
60.         {
    
61.                 sampleArray.RemoveAll();
    
62.                 sampleArray.Add(strName[i]);
    
63.                 sampleArray.Add(strAge[i]);
    
64.                 sampleArray.Add(strAge1[i]);
    
65.                 SS.AddRow(sampleArray);
    
66.         }
    
67.        
    
68.         // 初始化测试行数据，进行添加、插入及替换数据操作演示
    
69.         for (int k = 1; k <= 2; k++)
    
70.         {
    
71.                 testRow.Add("Test");
    
72.         }
    
73.        
    
74.         SS.AddRow(testRow);                                // 添加到尾部
    
75.         SS.AddRow(testRow, 2);                        // 插入新行到第二行
    
76.         SS.AddRow(testRow, 6, true);        // 替换原第四行来新的内容
    
77.        
    
78.         SS.Commit();       
    
79.        
    
80.         if(m_Check.GetCheck())
    
81.                 SS.Convert(";");            // 将原Excel文件转换为用分号分隔的文本，并另存为同名文本文件
    
82. 
    
83.         AfxMessageBox("文件写入成功!");
    
84. }

复制代码

(, 下载次数: 0)

上传

点击文件名下载附件
[halcon]1[/halcon]
[MFC408]1[/MFC408]
[weixinlianxi]1[/weixinlianxi]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4