Foxtable(狐表)用户栏目专家坐堂 → 窗口打印时的选定行问题


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

主题:窗口打印时的选定行问题

美女呀,离线,留言给我吧!
yangming
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 15:49:00 [只看该作者]

试验结果,必须时时打开此窗口.不然会报错


 回到顶部
美女呀,离线,留言给我吧!
yangming
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 15:54:00 [只看该作者]

窗口中要有:positionchanged 事件就好了

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/6/5 16:55:00 [只看该作者]

以下是引用yangming在2009-6-5 15:49:00的发言:

试验结果,必须时时打开此窗口.不然会报错

把窗口设为独立型,
Forms("支piao").open()
Forms("CheckPrint").visible = false
这样窗口就看不见了,预览可以照常进行  !~


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


加好友 发短信
等级:幼狐 帖子:147 积分:947 威望:0 精华:0 注册:2009/5/12 9:43:00
  发帖心情 Post By:2009/6/5 17:39:00 [只看该作者]

我一直没有研究,利用循环语句,通过向下移动焦点行的方式来打印是不是实现起来能容易点?(没学到这一点,只是猜想)


 回到顶部
美女呀,离线,留言给我吧!
yangming
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 17:39:00 [只看该作者]

我将下面代码放到表事件:AfterLoadTableSetting中
Forms("支piao").open()

Forms("支piao").visible = false
就不会报错了,再次感谢mr725老师


 回到顶部
美女呀,离线,留言给我吧!
yangming
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 19:06:00 [只看该作者]

窗口的

AfterLoad中还是要放上以下的代码,不然打开窗口时第一行的大写金额还是不能计算
Dim lbl As WinForm.Label
lbl = e.Form.Controls("Label5")
lbl.Text = CUMoney(dr("金额"))

[此贴子已经被作者于2009-6-5 19:08:18编辑过]

 回到顶部
美女呀,离线,留言给我吧!
yangming
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 19:09:00 [只看该作者]

以下是引用易狐在2009-6-5 17:39:00的发言:

我一直没有研究,利用循环语句,通过向下移动焦点行的方式来打印是不是实现起来能容易点?(没学到这一点,只是猜想)

我就是利用循环语句,来移动行的方式来打印的


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/6/5 21:22:00 [只看该作者]

以下是引用yangming在2009-6-5 19:06:00的发言:

窗口的

AfterLoad中还是要放上以下的代码,不然打开窗口时第一行的大写金额还是不能计算
Dim lbl As WinForm.Label
lbl = e.Form.Controls("Label5")
lbl.Text = CUMoney(dr("金额"))

[此贴子已经被作者于2009-6-5 19:08:18编辑过]

afterload只是在打开窗口时加载一次,换行时不会重新加载呀~  所以要在positionchanged中给(支piao)窗口的控件来赋值吧~


 回到顶部
总数 18 上一页 1 2