您的位置:程序门 -> vb -> 基础类



交互式开发的问题?


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


交互式开发的问题?
发表于:2007-07-21 09:11:02 楼主
请教高手?
      我做了一个绘直线,圆等的菜单,点击直线菜单,开始绘直线,可是我现在绘直线的代码非要放到mousedown事件中才能完成直线的绘制,我如何才能在直线的菜单中完成这一操作?
也就是当单击直线菜单,提示拾取一点,如果没有拾取点,则不进行任何操作,直到拾取到一点后,提示拾取另一点,然后绘完直线!
可能就是需要一个getpoint的函数
发表于:2007-07-21 12:56:441楼 得分:0
getpoint是autocad的vba吗?你想让用户拾取一点,再开始画,可以在菜单的click事件写入要求输入点或拾取点的代码,但是,画板中,还得用mousedown   或mouseup之类事件取得你所
拾取的点坐标啊
发表于:2007-07-21 19:20:292楼 得分:0
把拾取第二点的值写入一个不显示的textbox中,利用如下事件:
private   sub   text1_change()
      line...
end   sub


快速检索

最新资讯
热门点击