祝賀已超 1 萬工控人加入 PLC 工業(yè)自動(dòng)化精 英群

祝賀已超 1 萬工控人加入 PLC 工業(yè)自動(dòng)化精 英群

一、一覽圖

二、主要控件

2.1 日期控件：對(duì)象-->UI控件-->日期時(shí)間，本次設(shè)計(jì)兩個(gè)日期時(shí)間，分別是UIDateTime1（查詢開始日期）和UIDateTime2（查詢結(jié)束日期）；如下圖所示：

2.2 報(bào)表控件：工具箱-->報(bào)表，定義為Report1

選擇編輯后，出現(xiàn)可以編輯的表格：

2.3 按鈕

2.3.1 查詢按鈕

按下腳本如下：

float y1;

float m1;

float d1;

long StartTime;

long EndTime;

y1=UIDateTime1.Year;

m1=UIDateTime1.Month;

d1=UIDateTime1.Day;

string dtime1=StrFromReal(y1,0,"f")+"-"+StrFromReal(m1,0,"f")+"-"+StrFromReal(d1,0,"f");

float y2;

float m2;

float d2;

long StartTime2;

long EndTime2;

y2=UIDateTime2.Year;

m2=UIDateTime2.Month;

d2=UIDateTime2.Day;

string dtime2=StrFromReal(y1,0,"f")+"-"+StrFromReal(m1,0,"f")+"-"+StrFromReal(d1,0,"f");

// \\local\selectdate=dtime1;

Report1.SetCellStrings(4,1,27,3,"");? //清空單元格

Report1.SetCellString(2,2,dtime1);? //填寫日期

StartTime=ConvertTimeToSecond(y1,m1,d1,0,0,0,0);

EndTime=ConvertTimeToSecond(y2,m2,d2,23,59,59,0);

Report1.SetTime(StartTime,EndTime,3600000);

Report1.SetHistData("\\local\PV1",2);??

Report1.SetHistData("\\local\PVQ1",3);

Report1.SetHistData("\\local\FT101",4);??

Report1.SetHistData("\\local\Total_FT101",5);

Report1.SetHistData("\\local\JS_COD",6);

Report1.SetHistData("\\local\JS_進(jìn)水NH3N",7);

Report1.Query();

2.3.2?打印預(yù)覽按鈕

Report1.Preview();

2.3.3?打印按鈕

Report1.Print();

2.3.4 導(dǎo)出保存按鈕

string filename;

filename="C:\進(jìn)水報(bào)表.xls";

Report1.ReportSaveAs(filename);