在VBA中,設定物件的屬性使用以下敘述

object.method(argument).property:= value

轉換為Perl敘述為

object->method(argument)->{property}:= value;

那麼VBA的常數在Perl中是否可以使用呢?
可以的,我們可以利用Win32::OLE::Const模組,
使用此模組可以得到OLE伺服器中所有的預設常數,
以下是輸出所有Excel常數的程式


use Win32::OLE;
use Win32::OLE::Const;

my $xl:= Win32::OLE::Const->Load('Microsoft Excel');
foreach $item(sort keys %$xl){
print "$item = $xl->{$item} \n";
}


參考資料:
PERL 編程核心技術

jck11 發表在 痞客邦 PIXNET 留言(0) 人氣()