| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp) -- 高级功能研发区 (http://weistock.com/bbs/list.asp?boardid=5) ---- [求助]排序 (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=183567) |
| -- 作者：wjs -- 发布时间：2020/12/22 16:36:42 -- [求助]排序 请求帮忙写个排序吧，自己实在写不了。 已取得了数据。 Sub MarketData_ReportNotify(ReportData)
Set RC1 = MarketData.GetReportData("AG02","SQ")
Set RC2 = MarketData.GetReportData("NI02","SQ")
Set RC3 = MarketData.GetReportData("ZN02","SQ")
Application.MsgOut Cdate(time) & " AG02 " & RC1.PriceSpeed
Application.MsgOut Cdate(time) & " NI02 " & RC2.PriceSpeed
Application.MsgOut Cdate(time) & " ZN02 " & RC3.PriceSpeed
End Sub 万分感谢！ |
| -- 作者：yukizzc -- 发布时间：2020/12/22 19:51:45 -- https://blog.csdn.net/weixin_30258901/article/details/99931565 试试看呢，冒泡排序 |