Foxtable(狐表)用户栏目专家坐堂 → 绘图请教


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

主题:绘图请教

帅哥,在线噢!
kk000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:724 威望:0 精华:0 注册:2021/11/25 17:17:00
绘图请教  发帖心情 Post By:2022/11/11 11:40:00 [只看该作者]

 如题

需要再2个 单元格 上 做一个 直线连接

通过日期判断.

请问如何实现

图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/11 11:51:00 [只看该作者]

画线很简单。最主要的是要判断哪个单元格需要画线,没看懂要怎么判断

 回到顶部
帅哥,在线噢!
kk000
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:724 威望:0 精华:0 注册:2021/11/25 17:17:00
  发帖心情 Post By:2022/11/11 12:06:00 [只看该作者]

 单元格上  转接项 写 了  那个  就从那个跳转过去

跳转原则 为   1.3  计划结束日  到    2.1 的 计划开始日

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/11 13:31:00 [只看该作者]

请上传实例测试

 回到顶部
帅哥,在线噢!
kk000
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:724 威望:0 精华:0 注册:2021/11/25 17:17:00
  发帖心情 Post By:2022/11/15 15:38:00 [只看该作者]

 蓝版 ,请教下 画出来的竖线直线   会出现闪烁的情况,  这个怎么解决呢?

横线 好像没这个问题!


点检同一个表的单元格,   这个竖线 会  变空!

这个怎么弄?
[此贴子已经被作者于2022/11/15 15:38:14编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/15 15:58:00 [只看该作者]

请上传实例测试

 回到顶部
帅哥,在线噢!
kk000
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:724 威望:0 精华:0 注册:2021/11/25 17:17:00
  发帖心情 Post By:2022/11/16 8:57:00 [只看该作者]

蓝板 请帮忙看看

窗体打开后,全部展开,可以看到
连接2个单元格的红色线条

问题1:  红色的链接线闪烁

问题2:  链接的起始点 调整不到 对的地方

问题3: 起始位置调整后, 红色线 不会重新绘制


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:例子.zip


[此贴子已经被作者于2022/11/16 8:58:04编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/16 9:28:00 [只看该作者]

不能跨单元格画线,只画自己单元格的线。

 回到顶部
帅哥,在线噢!
kk000
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:69 积分:724 威望:0 精华:0 注册:2021/11/25 17:17:00
  发帖心情 Post By:2022/11/16 9:51:00 [只看该作者]

 蓝板 是我写错了吗

                If e.Row.Index >= n AndAlso e.Row.Index <= r.Index Then
                e.Graphics.DrawLine(Pens.Red, e.x + e.Width  , e.Height , e.x + e.width ,e.y + e.Height)
                End If

我这么写的,  但是 竖线还是会闪烁, 鼠标移到到这个线的位置  就会看不见

 回到顶部
帅哥,在线噢!
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/16 10:03:00 [只看该作者]

e.Graphics.DrawLine(Pens.Red, e.x   , e.y, e.x  ,e.y + e.Height)

 回到顶部
总数 12 1 2 下一页