一起创业网-为互联网创业者服务

pb程序怎么画边框

在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窗口、更改标题栏、给单元格赋值、设置列宽和行高、插入和删除分页符以及设置边框线的宽度和样式。根据你的具体需求,可以选择性地执行这些步骤。