推荐书: Python开发最佳实践

SPSS自动化:[3]结果输出文档对象的属性

分享时@该用户已经被封, 我就能回答你的问题奥!

  • 1>designated属性

  • 2>height 和width属性

  • 3>items属性

  • 用法:

  • Dim objoutputdoc as ispssoutputdoc

  • Set objoutputdoc=objspssapp.getgesignatedoutputdoc ‘声明变量并获取指定的输出文档。

  • Dim objoutputitems as ispssitems

  • Dim objoutputitem as ispssitem

  • Set objoutputitems=objoutputdoc.items ‘声明并获取项目对象

  • Dim intcount as integer

  • Dim strtype() as string

  • Intcount=objoutputitems.count

  • Redim strtype(intcount)

  • For i=0 to count-1

  • Objoutputitem=objoutputitems.getitem(i)

  • Strtype(i)=objoutputitem.spsstype

  • Next I

  • 4>label属性:返回或者设置某个输出项的标签

  • 用法:

  • Dim objoutputdoc as ispssoutputdoc

  • Set objoutputdoc=objspssapp.openoutputdoc(“c:\out.spo”)

  • Dim objoutputitems as ispssitems

  • Dim objoutputitem as ispssitem

  • Set objoutputitems=objoutputdoc.items

  • Dim intcount as integer

  • Intcount=objoutputitems.count

  • For i=0 to intcount-1

  • Set objoutputitem=objoutputitems.getitem(i)

  • If objoutputitem.label=’notes’ then

  • Objoutputitem.selected=true

  • Exit for

  • End if

  • Next i

  • 5>left和top属性:设置输出文档对象的位置

  • 7>outliningtoolbarvisible属性:在输出浏览器窗口中显示或者隐藏外观工具条。

  • 用法:objoutputdoc.outliningtoolbarvisible=true

  • 8>printoptions属性:返回打印选项对象。

  • 用法:

  • Setobjprintoptions=objoutputdoc.printoptions

  • Objprintoptions.headertext=”str”

  • Objprintoptions.papersize=4

  • Objprintoptions.papersource=1

  • Objprintoptions.startingpagenumber=10 ‘从第十页开始打印

  • Objoutputdoc.printdoc

  • 8>splitterpositon属性:返回或者设置分割线的位置。

  • 用法:

  • objoutputdoc.splitterposition=objoutputdoc.width/2

  • 9>standardtoolbarvisible属性:返回或者设置标准工具条的可见性。

  • 用法:

  • Objoutputdoc.standardtoolbarvisible=true

  • 10>visible属性:可见性。

  • 11>windowstate属性:窗口状态属性。

转载请注明来自DataScience.

邮箱: 675495787@qq.com