高级功能研发区-[求助]为什么会报缺少对象金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  [求助]为什么会报缺少对象  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=75550)

--  作者：cyq220657
--  发布时间：2015/2/10 15:56:56
--  [求助]为什么会报缺少对象

Sub UserForm2_start_Click()
mymarket =UserForm2_bmarket.text
mypingzhong=UserForm2_bpingzhong.text

Set ReportData1 = marketdata.GetReportData(mypingzhong,mymarket)

red =order.Buy(0,1, ReportData1.Newprice ,0,mypingzhong,mymarket,"",0)‘这行为什么会出错报缺少ReportData1对象，前面是set这个对象变量了

a="sfs"
if mymarket = a then
msgbox "exit"
exit sub
end if
end sub

--  作者：FexTel
--  发布时间：2015/2/10 16:18:14
--

1,是不是不是专业版?标准版不能使用ORDER对象

代码看了下没有问题

--  作者：yukizzc
--  发布时间：2015/2/10 16:20:34
--
mymarket =UserForm2_bmarket.text
mypingzhong=UserForm2_bpingzhong.text

你看下窗体里这两个text对应市场和品种代码都有并且正确吗？如果没有的话自然会有你这个情况

--  作者：cyq220657
--  发布时间：2015/2/10 16:42:56
--
是标准的

--  作者：FexTel
--  发布时间：2015/2/10 16:56:45
--

看下三楼回复,您看下是不是窗体里的text没有设定值?

--  作者：cyq220657
--  发布时间：2015/2/10 22:32:30
--
没有填值也会这样吗？

--  作者：FexTel
--  发布时间：2015/2/11 9:04:42
--
是的,你刚开始要赋值或者直接在窗体 text里面设定好值启动宏即可