以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何设置只打印当前行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124871)

--  作者:smardisk
--  发布时间:2018/9/15 10:47:00
--  [求助]如何设置只打印当前行
打印会出现多数据打印。能不能设置为只打印当前行
图片点击可在新窗口打开查看此主题相关图片如下:23.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/9/15 10:48:00
--  
什么方式打印的?贴出代码,或者模板看看
--  作者:smardisk
--  发布时间:2018/9/15 10:50:00
--  
代码这样对吗
图片点击可在新窗口打开查看此主题相关图片如下:231.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/9/15 10:57:00
--  
对窗口表筛选只剩下需要打印的行即可

Dim t As Table = e.Form.controls("Table1").Table
Dim f As String = t.Filter
If t.Current IsNot  Nothing Then
    t.Filter= "[_Identify] = " & t.Current("_Identify")
End If
\'原来的打印代码
t.Filter = f

--  作者:smardisk
--  发布时间:2018/9/15 11:31:00
--  
老是这样行的筛选是有了,可是图形就不见了
--  作者:smardisk
--  发布时间:2018/9/15 11:32:00
--  

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

--  作者:有点蓝
--  发布时间:2018/9/15 11:45:00
--  
这个筛选不可能和图形有关系。

要打印的控件必须在同一个层次,不能嵌套到其他容器里