摘要:
//十进制 to 二进制function IntToBin(Value: LongInt;Size: Integer): String;vari: Integer;beginResult:='';for i:=Size-1 downto 0 do begin if Value and (1 shl i)<>0 then begin Result:=Result+'1'; end els... 阅读全文
摘要:
public bool ExcelOut(string filename,string sql1,string sql2){try{// Start a new workbook in Excel.m_objExcel = new Excel.Application();m_objBooks = (Excel.Workbooks)m_objExcel.Workbooks;m_objBook = (... 阅读全文