如何使用C语言选择性读入txt数据并写入excel

文件中函数的功能如下：

文件名      

函数原形

函数功能      

函数处理描述      

void denglu()；

登陆函数；    姿滚册  

用for语句控制密码输入次数。

void xuanze()     

选择要进入的选项      

输入序号选择进入模块；

void inputinfo() 

输入信息；  

用if语句判断能否继续输入信息，根据提示输入信息  

void outputinfo()   

输出信息；      

用for循环输出基本信息

void find()   

查询信息；      

利用for循环进行查找，用if 语句判断是否找到要找的信息，然后显示。

void sortscore()   

按对信息进行排序；    

先输入信息，然后利用排序子函数进行排备兆序从而实现插；

void modify()   

建信息；      

利用for循环把要删除的结构体变量用后面的覆盖，且从此处以后后面的变量覆盖前面的，以此完成删除任务；

void writetofile()   

按编号删除信息；    

用if判断文件是否创建成功，利用for循环实现信息保存

void readfile()   

按编号查询信息；  

用if判断文件是否能打开，利用for循环实现迹宏信导入

 

您好，一、 包含Excel文件 *** 作类头文件

#include "CSpreadSheet.h"

二、 新建Excel文件，并写入默认数据

// 新建Excel文件名及路径，TestSheet为内部表名

CSpreadSheet SS("c:\\Test.xls", "TestSheet")

CStringArray sampleArray, testRow

SS.BeginTransaction()

// 加入姿顷标题

sampleArray.RemoveAll()

sampleArray.Add("姓名")

sampleArray.Add("年龄")

SS.AddHeaders(sampleArray)

// 加入数据

CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"}

CString strAge[] = {"27","23","28","27","26"}

for(int i = 0i <sizeof(strName)/sizeof(CString)i++)

{

sampleArray.RemoveAll()

sampleArray.Add(strName[i])

sampleArray.Add(strAge[i])

SS.AddRow(sampleArray)

}

SS.Commit()

三、 读取Excel文件数据

CSpreadSheet SS("c:\\Test.xls"闭册老, "TestSheet"轿升)

CStringArray Rows, Column

//清空列表框

m_AccessList.ResetContent()

for (int i = 1i <= SS.GetTotalRows()i++)

{

// 读取一行

SS.ReadRow(Rows, i)

CString strContents = ""

for (int j = 1j <= Rows.GetSize()j++)

{

if(j == 1)

strContents = Rows.GetAt(j-1)

else

strContents = strContents + " -->" + Rows.GetAt(j-1)

}

m_AccessList.AddString(strContents)

}

四、 对已存在Excel表格数据进行添加、插入、替换 *** 作

// 初始化测试行数据，进行添加、插入及替换数据 *** 作演示

for (int k = 1k <= 2k++)

{

testRow.Add("Test")

}

SS.AddRow(testRow) // 添加到尾部

SS.AddRow(testRow, 2) // 插入新行到第二行

SS.AddRow(testRow, 6, true)// 替换原第四行来新的内容

SS.AddCell("徐景周", 1,2) // 添加(不存在)或替换(存在)第二行，第一列单元格内容

SS.Commit()

五、 对已存在Excel表格数据进行行、列、单元格查询

void CExcelAccessDlg::OnQuery()

{

CSpreadSheet SS("c:\\Test.xls", "TestSheet")

CStringArray Rows, Column

CString tempString = ""

UpdateData()

if(m_strRow == "" &&m_strColumn == "") // 查询为空

{

AfxMessageBox("行号、列号不能同时为空!")

return

}

else if(m_strRow == "" &&m_strColumn != "")// 查询指定列数据

{

int iColumn = atoi(m_strColumn)

int iCols = SS.GetTotalColumns()

if(iColumn >iCols) // 超出表范围查询时

{

CString str

str.Format("表中总列数为: %d, ", iCols)

AfxMessageBox(str + " 查询列数大于Excel表中总列数，请重新输入!")

return

}

// 读取一列数据，并按行读出

if(!SS.ReadColumn(Column, iColumn))

{

AfxMessageBox(SS.GetLastError())

return

}

CString tmpStr

for (int i = 0i <Column.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", i+1,iColumn,Column.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

}

else if(m_strRow != "" &&m_strColumn == "") // 查询指定行数数据

{

int iRow = atoi(m_strRow)

int iRows = SS.GetTotalRows()

if(iRow >iRows) // 超出表范围查询时

{

CString str

str.Format("表中总行数为: %d, ", iRows)

AfxMessageBox(str + " 查询行数大于Excel表中总行数，请重新输入!")

return

}

// 读取指定行数据

if(!SS.ReadRow(Rows, iRow))

{

AfxMessageBox(SS.GetLastError())

return

}

CString tmpStr

for (int i = 0i <Rows.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", iRow, i+1, Rows.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

}

else if(m_strRow != "" &&m_strColumn != "") // 查询指定单元格数据

{

int iRow = atoi(m_strRow), iColumn = atoi(m_strColumn)

int iRows = SS.GetTotalRows(), iCols = SS.GetTotalColumns()

if(iColumn >iCols) // 超出表范围查询时

{

CString str

str.Format("表中总列数为: %d, ", iCols)

AfxMessageBox(str + " 查询列数大于Excel表中总列数，请重新输入!")

return

}

else if(iRow >iRows)

{

CString str

str.Format("表中总行数为: %d, ", iRows)

AfxMessageBox(str + " 查询行数大于Excel表中总行数，请重新输入!")

return

}

// 读取指定行、列单元格数据

if(!SS.ReadCell(tempString, iColumn, iRow))

{

AfxMessageBox(SS.GetLastError())

return

}

CString str

str.Format("行号: %d, 列号: %d ,内容: %s", iRow,iColumn,tempString)

AfxMessageBox(str)

}

}

六、 将存在的Excel转换另存为指定分隔的文本文件

// 将原Excel文件转换为用分号分隔的文本，并另存为同名文本文件

SS.Convert("")

七、 删除Excel中表格

SS. DeleteSheet() // 删除Excel文件中所有表格

SS. DeleteSheet(" TestSheet ") // 删除Excel中TextSheet表格

八、 获取Excel中总行数、总列数、当前行

int iCols = SS.GetTotalColumns() // 总列数

int iRows = SS.GetTotalRows() // 总行数

int iCurRow = SS.GetCurrentRow()// 当前所在行号

九、 获取行头数据

CStringArray rowHeader

SS.GetFieldNames(rowHeader)

CString tmpStr

for (int i = 0i <rowHeader.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", 1, i+1, rowHeader.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

最后，如果想知道详细实现细节的话，可以在下载示例源码后，仔细查看源码既可(内有详细注释)。

将txt中的数据转到excel表中，做为matlab的数据源。步骤如下：下载一个Microsoft.Office.Interop.Excel.dll 在项目中引用。

编写代码如下：

string path = "c://date//xyu.txt"

StreamReader sr = new StreamReader(path)

string strLine = sr.ReadLine()

int rowNum = 1

object missing = System.Reflection.Missing.Value

ApplicationClass app = new ApplicationClass()

app.Application.Workbooks.Add(true)

Workbook book = (Workbook)app.ActiveWorkbook

Worksheet sheet = (Worksheet)book.ActiveSheet

while (!string.IsNullOrEmpty(strLine))

{

string[] tempArr

tempArr = strLine.Split(',')

for (int k = 1k <= tempArr.Lengthk++)

{

sheet.Cells[rowNum, k] = tempArr[k - 1]

}

strLine = sr.ReadLine()

rowNum++

}

//保存excel文件

book.SaveCopyAs("D://source.xls")

//关闭文件

book.Close(false, missing, missing)

//退出excel

app.Quit()

MessageBox.Show("转含做化成功！")

以上代码可以实现皮誉功能，由于txt中的数据有60501行，数据量太大谈握衡。估算了一下，用以上代码转到excel要用大约2-3分钟。用rang方法可以提高速率。只用大约3-4秒钟的时间，提高效率几十倍。代码如下：

string path = "c://date//xyu.txt"

StreamReader sr = new StreamReader(path)

string strLine = sr.ReadLine()

int rowNum = 1

object missing = System.Reflection.Missing.Value

ApplicationClass app = new ApplicationClass()

app.Application.Workbooks.Add(true)

Workbook book = (Workbook)app.ActiveWorkbook

Worksheet sheet = (Worksheet)book.ActiveSheet

Range r = sheet.get_Range("A1", "C1")

//获取行数

object[,] objectData = new object[65535, 3]

while (!string.IsNullOrEmpty(strLine))

{

string[] tempArr

tempArr = strLine.Split(',')

for (int k = 1k <= tempArr.Lengthk++)

{

objectData[rowNum-1, k-1] = tempArr[k - 1]

}

strLine = sr.ReadLine()

rowNum++

}

r = r.get_Resize(65535, 3)

r.Value2 = objectData

r.EntireColumn.AutoFit()

//保存excel文件

book.SaveCopyAs("D://source.xls")

//关闭文件

book.Close(false, missing, missing)

//退出excel

app.Quit()

MessageBox.Show("转化成功！")

---