C#是?；贜et平臺的高級編程軟件，語法類似于VB和C，界面友好，可視化也非常好。這里我要介紹一個用C#操作Excel的小軟件。

啟動VS2019并創(chuàng)建新的C#窗口應(yīng)用程序。將復(fù)合框comboBox和按鈕button1添加到窗口Form中，并將按鈕button1的CaptIOn更改為“Open”。

圖1。界面設(shè)計

雙擊Form進入代碼編寫界面(類似于VB)。首先添加參考，單擊“項目”下的“添加參考”，然后使用“Microsoft excel 16.0 object library”和“Microsoft(版本16 . 0用于操作Office2013或更高版本)”。要操作早期版本，請使用Microsoft）

圖2添加兩個參考

在代碼中添加以下Using語句：

Using System

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Excel=Micro

Using Office=Micro

Using Sy

Using Sy

在Private void Form1_Load的兩個大括號{}中添加代碼。完整的代碼如下：

Private void form1 _ load(對象生成器、eventargs e)

{

stream reader Sr=file . open text(@ ' \ \ 10 . 138 . 4 . 129 \抗體試驗部門工作文件\2019\6月\ AK 2002 VSTO)；

字串NextLine

While((NextLine=SR.ReadLine())！=空)

{

字串批次；

batch=Nex(' \ t ')[0]；

組合框1.i(布置)；

}

SR . Close()；

}

在這里，F(xiàn)ile。OpenText后面的文件是以TXT格式存儲所有數(shù)據(jù)文件的文件名(路徑和擴展名除外)的目錄文件。

雙擊Button1，完成代碼如下：

Using System

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Sy

Using Excel=Micro

Using Office=Micro

Using Sy

Using Sy

namespace windows forms app 20190621 _ AK 2002

{

public partial classform 1 3360 form

{

Public Form1()

{

initialize component()；

}

Private void form1 _ load(對象生成器、eventargs e)

{

stream reader Sr=file . open text(@ ' \ \ 10 . 138 . 4 . 129 \抗體試驗部門工作文件\2019\6月\ AK 2002 VSTO)；

字串NextLine

While((NextLine=SR.ReadLine())！=空)

{

字串批次；

batch=Nex(' \ t ')[0]；

組合框1.i(布置)；

}

SR . Close()；

}

Private void button1 _ click(對象服務(wù)器、事件e)

{

Excel。Application ExcelApp

字串批次，檔案名稱；

If==-1)

Me(“未選擇批次！”)；

Else

{

Batch=comboBox1。Text

\ FILENAME=@ ' \ \ 10 . 138 . 4 . 129 \抗體試點部門工作文件\2019\6月\AK2002VSTO\' Batch '。FP '；

ExcelApp=('Excel .' application ')；

Excel。工作表wst

wst=；

w()；

W=布局；

Int i、j；

I=1；

Streamreader mysr=file.opentext(文件名)；

字串NextLine

While ((NextLine=mySR。ReadLine()！=空)

{

string[]MSG；

msg=Nex(' \ t ')；

j=1；

foreach(MSG字串)

{

W[i，j]=s；

j；

}

I；

}

W['I2']。select()；

Excel。ChartObjects my chart=)；

Foreach Ch in MyChart)

Ch。delete()；

Excel.chartobjectchob=myc (50，50，500，300)；

Excel。CHART CH=C；

Ch.chartwizard (w ['b23360b13']，excel.xlc，ty，ty，' day '，' * 10 6/ml '，')

Ch.seriescollection (1)。x values=w[' a 2: a 13 ']；

}

}

}

}

該程序可以對所有新Excel執(zhí)行數(shù)據(jù)操作。