Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共7 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]为什么会报缺少对象

1楼
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
2楼
FexTel 发表于:2015/2/10 16:18:14

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

 

代码看了下没有问题

3楼
yukizzc 发表于:2015/2/10 16:20:34
mymarket  =UserForm2_bmarket.text 
mypingzhong=UserForm2_bpingzhong.text
 
你看下窗体里这两个text对应市场和品种代码都有并且正确吗?如果没有的话自然会有你这个情况
 
4楼
cyq220657 发表于:2015/2/10 16:42:56
是标准的 
5楼
FexTel 发表于:2015/2/10 16:56:45

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

6楼
cyq220657 发表于:2015/2/10 22:32:30
没有填值 也会这样吗?
7楼
FexTel 发表于:2015/2/11 9:04:42
 是的,你刚开始要赋值或者直接在窗体 text里面设定好值启动宏即可
共7 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 2 queries.