在PowerBuilder(PB)程序中画边框,可以通过以下步骤实现:
创建Excel对象
```pb
eole = CREATEOBJECT('Excel.Application')
```
添加新工作簿
```pb
eole.Workbooks.Add
```
设置激活工作表
```pb
eole.Worksheets("sheet3").Activate
```
打开指定工作簿 (如果需要):```pb
eole.Workbooks.Open("c:/temp/ll.xls")
```
显示Excel窗口
```pb
eole.Visible = .T.
```
更改Excel标题栏(可选):
```pb
eole.Caption = "VFP应用程序调用Microsoft Excel"
```
给单元格赋值(可选):
```pb
eole.Cells(1, 4).Value = XM(XM为数据库字段名)
```
设置指定列的宽度(可选):
```pb
eole.ActiveSheet.Columns(1).ColumnWidth = 5
```
设置指定行的高度(可选):
```pb
eole.ActiveSheet.Rows(1).RowHeight = 1 / 0.035 ' 设定行高为1厘米
```
插入分页符(可选):
```pb
eole.Worksheets("Sheet1").Rows(18).PageBreak = 1
```
删除分页符(可选):
```pb
eole.ActiveSheet.Columns(4).PageBreak = 0
```
指定边框线宽度
```pb
eole.ActiveSheet.Range("b3:d3").Borders(2).Weight = 3 ' 设置边框线宽度为3磅
```
设置边框线样式
```pb
eole.ActiveSheet.Range("b3:d3").Borders(2).LineStyle = 1 ' 设置边框线样式为细实线
```
通过上述步骤,你可以在PowerBuilder程序中调用Excel并设置单元格的边框。这些步骤涵盖了创建Excel对象、添加工作簿、激活工作表、打开指定工作簿、显示Excel窗口、更改标题栏、给单元格赋值、设置列宽和行高、插入和删除分页符以及设置边框线的宽度和样式。根据你的具体需求,可以选择性地执行这些步骤。