Foxtable(狐表)用户栏目专家坐堂 → [分享] 编码绘制甘特图(上贴线帽的实例)20131206更新


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

主题:[分享] 编码绘制甘特图(上贴线帽的实例)20131206更新

帅哥哟,离线,有人找我吗?
flash518
  51楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:109 积分:640 威望:0 精华:0 注册:2013/11/22 15:21:00
  发帖心情 Post By:2014/3/1 22:22:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
land089
  52楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:451 积分:3045 威望:0 精华:1 注册:2012/7/17 22:08:00
  发帖心情 Post By:2014/3/1 23:25:00 [只看该作者]

看看!!!!!!!

 回到顶部
帅哥哟,离线,有人找我吗?
mojo
  53楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:52 积分:1030 威望:0 精华:0 注册:2012/2/26 22:20:00
  发帖心情 Post By:2014/3/3 21:56:00 [只看该作者]

看看

 回到顶部
帅哥哟,离线,有人找我吗?
jony_zhou
  54楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:680 威望:0 精华:0 注册:2014/3/4 11:25:00
  发帖心情 Post By:2014/3/5 13:58:00 [只看该作者]

ok

asd

 回到顶部
帅哥哟,离线,有人找我吗?
tianyuantool
  55楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:2 积分:88 威望:0 精华:0 注册:2014/3/5 23:58:00
  发帖心情 Post By:2014/3/6 0:54:00 [只看该作者]

不错。

 回到顶部
帅哥哟,离线,有人找我吗?
ruan
  56楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:4854 威望:0 精华:0 注册:2011/8/20 18:40:00
  发帖心情 Post By:2014/3/6 9:03:00 [只看该作者]

谢谢 分享~  顶~~

 回到顶部
帅哥哟,离线,有人找我吗?
jaegea
  57楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:480 积分:3826 威望:0 精华:0 注册:2011/5/31 15:45:00
  发帖心情 Post By:2014/4/11 11:15:00 [只看该作者]

Dim sct As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim pnl2 As WinForm.SplitPanel = sct.Panel2
Dim doc As PrintDoc = e.Form.GernatePrintDoc(pnl2)    '出錯位置
doc.Preview()

 

將項目收縮後打印出錯!!參數無效


 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  58楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2014/4/11 11:51:00 [只看该作者]

以下是引用jaegea在2014-4-11 11:15:00的发言:

Dim sct As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim pnl2 As WinForm.SplitPanel = sct.Panel2
Dim doc As PrintDoc = e.Form.GernatePrintDoc(pnl2)    '出錯位置
doc.Preview()

 

將項目收縮後打印出錯!!參數無效

图片点击可在新窗口打开查看      俺没试过打印。


 回到顶部
帅哥哟,离线,有人找我吗?
guoweidong
  59楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
  发帖心情 Post By:2014/4/11 11:58:00 [只看该作者]

不错

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  60楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2014/4/11 12:00:00 [只看该作者]

我在命令窗口中执行,没错啊?

用的是最后更新的那个案例

 

Dim sct As WinForm.SplitContainer = Forms("项目甘特图").Controls("SplitContainer1")
Dim pnl2 As WinForm.SplitPanel = sct.Panel2
Dim doc As PrintDoc = Forms("项目甘特图").GernatePrintDoc(pnl2)    '出錯位置
doc.Preview()


 回到顶部
总数 123 上一页 1 2 3 4 5 6 7 8 9 10 下一页 ..13