VFP和Excel都可以用來進行處理資料庫表格,如果巧妙地將二者的優點結合起來,將會大大方便我們的工作。
比如我們可以利用VFP進行處理資料,而利用Excel的預覽列印功能進行報表列印。這就需要我們在VFP中直接來控制Excel。下面就在開發VFP應用專案時對Excel的控制作一下介紹:
1.建立Excel物件
eole=CREATEOBJECT("Excel.application")
2.添加新工作簿
eole.Workbooks.add
3.設置第1個工作表為啟動工作表
eole.Worksheets("sheet1").Activate
4.打開指定工作簿
eole.Workbooks.Open("c:\temp\ll.xls")
5.顯示Excel視窗
eole.visible=.t.
6.更改Excel標題欄
eole.Caption="VFP應用程式使用Microsoft Excel"
7.給單格值
eole.cells(1,4).value=XM(XM為資料庫欄位名)
8.設置指定列的寬度(單位:字元個數)
eole.ActiveSheet.Columns(1).ColumnWidth=5
9.設置指定行的高度(單位:磅)
eole.ActiveSheet.Rows(1).RowHeight=1/0.035 (設定行高為1釐米,1磅=0.035釐米)
10.在第18行之前插入分頁符
eole.Worksheets("Sheet1").Rows(18).PageBreak=1
11.在第4列之前刪除分頁符
eole.ActiveSheet.Columns(4).PageBreak=0
12.指定邊框線寬度(Borders參數如下)
ole.ActiveSheet.Range("b3:d3").Borders(2).Weight=3
13.設置四個邊框線條的類型
eole.ActiveSheet.Range("b3:d3").Borders(2).Linestyle=1
(其中Borders參數:1-左、2-右、3-頂、4-底、5-斜、6-斜/;Linestyle值:1與7-細實、2-
細虛、4-點虛、9-雙細實線)
14.設置頁首
eole.ActiveSheet.PageSetup.CenterHeader=〃報表1〃
15.設置頁尾
eole.ActiveSheet.PageSetup.CenterFooter=〃第&P頁〃
16.設置頁首到頂端邊 ..
訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容