以DBF文件为例
create cursor tt (vfile c(20))
ncnt=adir(aa,"*.dbf")
b=1
append from array aa[b,1]
browse
list memory like aa
三、VFP控制EXCEL工作表
工作表是操作 EXCEL 时不可缺少的对象,同时是编辑单元格对象的入口和载体,利用 VFP 更好的控制 EXCEL 工作簿和单元格,掌握控制工作表的方法至关重要。
3.1 插入工作表
在新打开的工作簿中,默认有三个工作表,当工作表的数量不够用时,可以插入工作。
3.1.1 插入指定数量工作表
使用以下代码可以插入新的工作表。
1、插入单个空白工作表,不带参数增加新表至当前工作表之前
oExcel.Sheets.Add
说明:
●使用 Sheets (工作表集合对象)的 Add 方法可以插入空白工作表。
2...
一、创建Excel对象
oExcel=CreateObject('Excel.Application')
二、控制工作簿
2.1 新建工作簿
2.1.1 新建空白工作簿
1、默认为3个工作表
oExcel.WorkBooks.Add
2、新建一个仅包含一个工作表的工作簿
oExcel.WorkBooks.Add(-4167)
说明:
●在 Excel 中表示工作簿的关键字有 WorkBooks (工作簿集合对象)和 WorkBook (工作簿对象)。它们之间是集合与集合中对象的关系,即 WorkBooks 是 WorkBook 的集合。...
应用于 Workbooks 集合(对象)的 Add 方法。
新建工作簿时,用户通常会使用 WorkBooks 集合的 Add 方法,其代码如下:
oExcel.Workbooks.Add
如果新建工作簿时忽略 Add 方法的参数,那么在默认的情况下新建的工作簿将包含3个工作表。新建的工作簿中工作表的数量具体由“选项”对话框“常规”选项卡中的“新工作簿内的工作表数”决定,如下图所示,该数值能够通过 Application 对象的 SheetsInNewWorkbook 属性返回或设置。
Workbooks 集合(对象)的 Add 方法语法如下...
ox=CreateObject("MSwinsock.Winsock")
?'IP地址:',ox.LocalIP
?'计算机名:',ox.LocalHostName
RELEASE OX