VFP6.0 使用EXCLE表

1．创建Excel对象

eole=CREATEOBJECT(‘Excelapplication’)

2．添加新工作簿

eoleWorkbooksadd

3．设置第3个工作表为激活工作表

eoleWorksheets(“sheet3”)Activate

4．打开指定工作簿

eoleWorkbooksOpen(“c:\temp\llxls”)

5．显示Excel窗口

eolevisible=t

6．更改Excel标题栏

eoleCaption=“VFP应用程序调用Microsoft Excel”

7．给单元格赋值

eolecells(1,4)value=XM(XM为数据库字段名)

8．设置指定列的宽度(单位：字符个数)

eoleActiveSheetColumns(1)ColumnWidth=5

9．设置指定行的高度(单位：磅)

eoleActiveSheetRows(1)RowHeight=1/0035

(设定行高为1厘米，1磅=0035厘米)

10．在第18行之前插入分页符

eoleWorksheets(“Sheet1”)Rows(18)PageBreak=1

11．在第4列之前删除分页符

eoleActiveSheetColumns(4)PageBreak=0

12．指定边框线宽度(Borders参数如下)

oleActiveSheetRange(“b3:d3”)Borders(2)Weight=3

13．设置四个边框线条的类型

eoleActiveSheetRange(“b3:d3”)Borders(2)LineStyle=1

(其中Borders参数：1－左、2－右、3－顶、4－底、5－斜、6－斜/；LineStyle值：1与7－细实、2－细虚、4－点虚、9－双细实线)

14．设置页眉

eoleActiveSheetPageSetupCenterHeader=“报表1”

15．设置页脚

eoleActiveSheetPageSetupCenterFooter=“第＆P页”

16．设置页眉到顶端边距为2厘米

eoleActiveSheetPageSetupHeaderMargin=2/0035

17．设置页脚到底边距为3厘米

eoleActiveSheetPageSetupFooterMargin=3/0035

18．设置顶边距为2厘米

eoleActiveSheetPageSetupTopMargin=2/0035

19．设置底边距为4厘米

eoleActiveSheetPageSetupBottomMargin=4/0035

20．设置左边距为2厘米

veoleActiveSheetPageSetupLeftMargin=2/0035

21．设置右边距为2厘米

eoleActiveSheetPageSetupRightMargin=2/0035

22．设置页面水平居中

eoleActiveSheetPageSetupCenterHorizontally=t

23．设置页面垂直居中

eoleActiveSheetPageSetupCenterVertically=t

24．设置页面纸张大小(1－窄行8�5�11 39－宽行14�11)

eoleActiveSheetPageSetupPaperSize=1

25．打印单元格网线

eoleActiveSheetPageSetupPrintGridlines=t

26．拷贝整个工作表

eoleActiveSheetUsedRangeCopy

27．拷贝指定区域

eoleActiveSheetRange(“A1:E2”)Copy

28．粘贴

eoleWorkSheet(“Sheet2”)Range(“A1”)PasteSpecial

29．在第2行之前插入一行

eoleActiveSheetRows(2)Insert

30．在第2列之前插入一列

eoleActiveSheetColumns(2)Insert

31．设置字体

eoleActiveSheetCells(2,1)FontName=“黑体”

32．设置字体大小

eoleActiveSheetCells(1,1)FontSize=25

33．设置字体为斜体

eoleActiveSheetCells(1,1)FontItalic=t

34．设置整列字体为粗体

eoleActiveSheetColumns(1)FontBold=t

35．清除单元格公式

eoleActiveSheetCells(1,4)ClearContents

36．打印预览工作表

eoleActiveSheetPrintPreview

37．打印输出工作表

eoleActiveSheetPrintOut

38．工作表另为

eoleActiveWorkbookSaveAs(“c:\temp\22xls”)

39．放弃存盘

eoleActiveWorkbooksaved=t

40．关闭工作簿

eoleWorkbooksclose

41．退出Excel

eolequit

如不懂找我！

VFP表单对控件表格GRID的数据排序，它是通过代码控制排序，就是说在运算处理更新表的数据的时候，打开表文件时进行代码排序，然后在表格中显示出来。因为VFP是一个关系数据库运算处理平台，数据运算处理后，通过代码进行排序，再在表格中显示出来，不能象简单的软件那样单纯在表格中点击某字段就排序。这就是VFP关系复杂运算数据库的平台与不能进行复杂关系数据运算处理的其他软件平台的不同点。VFP的关系数据运算处理，是任何其他数据库程序语言所不能达到的先进性。很多人说C++等等都要比VFP数据处理强，完全是可笑之说。C++在进行复杂的“关系”数据运算上不管是运算速度上、还是编程的简易上都远不级VFP。“关系”运算，就是从千头万绪的项目数据中，通过取舍运算处理得到其他运算所得不到的高级表达。VFP就是这样的程序平台。

教你一个傻瓜的方法，

1新建一个form

2在form的init中打开那个你要修改的表

3在form上加上一个grid

4在grid上单击右健，选build也就是生成器

5选中那个你要改的表，点ok

6在GRID下在加一个button,在click事件中写入append blank

7执行表单

有方法将GRID控件中的数据输入到数据表中

将GRID控件与表绑定，使用的是RECORDSOURCE属性，如果绑定了表，要插入新数据必须通过按钮，在按钮中使用 APPE BLAN 或INSERT BLAN插入一行空行再输入新数据，修改就直接在GRID上找到那一行进行修改就可以了

1、点击表格--右键--编辑

2、双击表头。如图的，“单位名”打开表头“Header1”编辑框

3、在“Click”中输入代码

SET ORDE TO 单位名

4、退出--保存

注：相应字段在表中要有索引