'創(chuàng)建Block外部對(duì)象,將對(duì)象實(shí)例置變量b中
Set b = CreateObject("Stock.Block")
'打開(kāi)市場(chǎng)指定分類(lèi)名稱(chēng)的板塊
call b.open("自選股",1)
call b.AddStock("SH","600000")
call b.ToSave("自選","自選股")
'不要忘記釋放對(duì)象,不然會(huì)導(dǎo)致內(nèi)存泄漏
SET b = nothing