欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → VBA窗体怎么在图表中画线啊

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有5101人关注过本帖树形打印复制链接

主题：VBA窗体怎么在图表中画线啊
帅哥哟，离线，有人找我吗？
jianshi2020
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：391 积分：0 威望：0 精华：0 注册：2013/7/26 15:58:25 		VBA窗体怎么在图表中画线啊  发帖心情 Post By：2013/8/28 11:21:44 [只看该作者]

窗体程序中得到比如2335这个价格，然后希望把2335这个价格在图表上画一条直线，请问怎么操作

 回到顶部
帅哥哟，离线，有人找我吗？
rushtaotao
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 czt
等级：蜘蛛侠 帖子：1445 积分：6114 威望：0 精华：3 注册：2012/1/16 10:31:19 		  发帖心情 Post By：2013/8/28 13:47:43 [只看该作者]

DrawLine 方法

在指定位置绘制直线。

DrawLine(StartX, StartY, EndX, EndY, [Color], [Width], [Style])

StartX,StartY    起始点坐标。

EndX,EndY         结束点坐标

Color             可选参数，颜色值。

Width             可选参数，默认为1。

Style             可选参数，线条风格。0实线 1虚线 2点线 3虚线和点线交替，1－3风格只有Width为1时才有效。



在金字塔的对象方法中找找Gird对象里面有这个方法

建议发帖者静下心来学习，vba编程有个循序渐进的过程的
 回到顶部
帅哥哟，离线，有人找我吗？
jianshi2020
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：391 积分：0 威望：0 精华：0 注册：2013/7/26 15:58:25 		  发帖心情 Post By：2013/8/28 13:59:11 [只看该作者]


Sub UserForm1_CommandButton1_Click()
    Set  Grid = Frame1.GetGridByName("Window1")
    call grid.drawline(10,10,100,100,colorgreen)
End Sub
 
这是上次从你的回复中找到的代码
FRAME1对象从哪里得到的 啊。
我用Set Grid = Technic.GetGridByName("Main")
却花不了线
 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：11808 积分：20695 威望：0 精华：10 注册：2009/8/18 8:15:13 		  发帖心情 Post By：2013/8/28 14:16:31 [只看该作者]



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
jianshi2020
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：391 积分：0 威望：0 精华：0 注册：2013/7/26 15:58:25 		  发帖心情 Post By：2013/8/28 14:22:44 [只看该作者]

谢谢，已经可以画出来了，但是图像会闪烁的，怎样解决闪烁的问题啊

 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：11808 积分：20695 威望：0 精华：10 注册：2009/8/18 8:15:13 		  发帖心情 Post By：2013/8/28 14:37:58 [只看该作者]

在事件中绘图闪烁不会很严重的

金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
jianshi2020
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：391 积分：0 威望：0 精华：0 注册：2013/7/26 15:58:25 		  发帖心情 Post By：2013/8/28 14:42:44 [只看该作者]

不是，是这样的，我就设置一个按钮，CLICK事件，用过程SUB写的。

当按钮点击的时候，图表上出现一条直线。

可是一秒钟后（也就是行情一刷新）直线立刻消失。

请问这种办法怎么解决 啊？我要让直线在图表上永久保留，直到我想让它消失为止
 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：11808 积分：20695 威望：0 精华：10 注册：2009/8/18 8:15:13 		  发帖心情 Post By：2013/8/28 14:46:17 [只看该作者]

请您仔细好好看看4楼的帖子


金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
jianshi2020
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：391 积分：0 威望：0 精华：0 注册：2013/7/26 15:58:25 		  发帖心情 Post By：2013/8/28 14:58:03 [只看该作者]

在一个对象被移动或放大之后，或在一个覆盖该对象的窗体被移开之后，该对象部分或全部暴露时，此事件发生。

 

这是我搜到的paint事件的解释，我想请问下，怎样触发paint事件呢？在窗格程序中
 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：11808 积分：20695 威望：0 精华：10 注册：2009/8/18 8:15:13 		  发帖心情 Post By：2013/8/28 14:59:35 [只看该作者]

你再事件中使用 APPLICTAION.MSGOUT函数输出一些调试信息，自然就明白的


金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.79688 秒, 5 次数据查询