以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  请教窗体初始化时给文本框赋值问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=2327)
--  作者：明心
--  发布时间：2010/8/1 11:28:27
--  请教窗体初始化时给文本框赋值问题

窗体结构

框架控件1

文本框1

 

框架控件2

文本框2

 

 

代码结构

Sub mxjiaoyi_Initialize()

\' 得到框架名称为"Technic"，窗格名称为"Main"的窗格对象
Set Grid = Technic.GetGridByName("Main")

\'得到该窗格所对应的动态行情对象
Set ReportData = Grid.GetReportData()

\'取当前行情报价
NewPrice = ReportData.NewPrice
buy1 = ReportData.BuyPrice1
sell1 = ReportData.SellPrice1

\'文本框控件赋值——行情数据
框架控件1.文本框1.text = sell1

 

End Sub

 

测试的时候，红色的地方有问题，提示“缺少框架控件1对象”

请高手指教，我是新手，刚刚接触VBA，谢谢了。

[此贴子已经被作者于2010-8-1 11:40:02编辑过]
--  作者：admin
--  发布时间：2010/8/2 15:02:01
--  

你试试 框架控件1_文本框1.text = sell1

如果还是无法工作，那么请仔细检查控件的所有名字是否与你的代码一致，如果不行请把代码发上来
--  作者：volersky
--  发布时间：2010/8/3 10:25:01
--  

我以前试着了，这个框架的初始化好象有点问题，如果改在Application.start里面进行初始化，一点问题都没有

 
--  作者：Likai
--  发布时间：2010/8/4 8:53:59
--  

 

像 ReportData.BuyPrice1，这样的对象，如果需要变量初始化的话，

那个变量在VBA启动的时候，必须有一个初始值，否则，就会报错。

所以，局部变量可能就会报错，因为局部变量，是要在子程序运行的那一刻，

才有机会被初始化。