Foxtable(狐表)用户栏目专家坐堂 → 如何打印选定区域


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

主题:如何打印选定区域

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


加好友 发短信
等级:婴狐 帖子:5 积分:96 威望:0 精华:0 注册:2017/4/14 9:58:00
如何打印选定区域  发帖心情 Post By:2017/4/14 10:04:00 [只看该作者]

我是初学者,在一个表中我想打印部分行,打印预览里可选“”选定区域“”,但实际打印时不是打印的选定区域。如何解决?谢谢!

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/14 10:08:00 [只看该作者]

 

  你通过何种方式打印?直接打印,还是excel报表之类的。

 


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/14 10:10:00 [只看该作者]

 你可以选筛选数据,然后再打印

 

http://www.foxtable.com/webhelp/scr/0120.htm

 


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


加好友 发短信
等级:婴狐 帖子:5 积分:96 威望:0 精华:0 注册:2017/4/14 9:58:00
  发帖心情 Post By:2017/4/14 10:14:00 [只看该作者]

直接打印的

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


加好友 发短信
等级:婴狐 帖子:5 积分:96 威望:0 精华:0 注册:2017/4/14 9:58:00
  发帖心情 Post By:2017/4/14 10:19:00 [只看该作者]

窗口中定义按钮,打印从n行到m行,打印代码?

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


加好友 发短信
等级:婴狐 帖子:5 积分:96 威望:0 精华:0 注册:2017/4/14 9:58:00
  发帖心情 Post By:2017/4/14 10:27:00 [只看该作者]

http://www.foxtable.com/webhelp/scr/1233.htm

这些代码就可以解决我的问题吧?


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/14 10:39:00 [只看该作者]

6楼的帮助文档可以做到。

 

也可以用下面的代码实现你需要的功能。

 

Dim t As Table = Tables("表a")
Dim idxs As String = ""
Dim tbl As WinForm.Table

e.Form.RemoveControl("test")
tbl = e.Form.CreateTable("test", t.name, True)
e.Form.AddControl(tbl)
tbl.visible = False


For i As Integer = t.TopPosition To t.BottomPosition
    idxs &= t.Rows(i)("_Identify") & ","
Next
Dim nt As Table = tbl.Table
nt.Filter = "_Identify in (" & idxs.Trim(",") & ")"
nt.Print(True, False)


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


加好友 发短信
等级:婴狐 帖子:5 积分:96 威望:0 精华:0 注册:2017/4/14 9:58:00
  发帖心情 Post By:2017/4/14 16:13:00 [只看该作者]

谢谢,按照您的方法我再试试。
我按照六楼的代码,实现了我要的功能。
但是在我选择的行数超过一页的范围时,它不能自动分页。每次只能打印一页。如何解决。?

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/14 16:40:00 [只看该作者]

 我直接测试6楼的代码,并没有问题。你代码怎么写的?

 

 用7楼的代码,有没有问题?


 回到顶部