设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1357|回复: 9
打印 上一主题 下一主题

[窗体] 请教怎么让文本框或组合框里面的数据全部都打印出来?

[复制链接]
跳转到指定楼层
1#
发表于 2008-12-16 16:58:41 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我做了个票据打印程序,组合框里的数据超过了组合框的宽度,系统默认分几行显示,但是打印出来的时候多出的几行打印不出来,因为超过了组合框的高度,请问如何解决?

备注:1。因为程序的特殊性,组合框的高度和宽度是固定的,不能调整,
2.因为程序把所有系统菜单都屏蔽,所以不能调用字体大小工具。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-12-16 17:28:58 | 只看该作者
可以打印组合框的行来源
3#
 楼主| 发表于 2008-12-17 10:38:15 | 只看该作者
斑竹我没听懂阿,能详细点不
4#
 楼主| 发表于 2008-12-17 10:54:58 | 只看该作者
刚我想了个办法,就是在单击打印记录的按钮事件中,添加如下代码,目的是在打印前调整组合框的宽度,然后打印,然后在恢复组合框的宽度到原来的宽度,本来以为可以,但是结果反而是打印不出数据,也就是说以前仅仅是多出来的字打印不出来,现在是打印不出任何字。为什么?斑竹以及各位高手帮忙

If Len(Me!组合框) > 15 Then  ,判断输入的数据是否超过组合框宽度(我数了下,整个组合                框宽度大概容纳15个汉字
   Me!组合框.FontSize = 9  ,将字体从默认的10号调整到9号大小,以便文本框容纳更多数据
   End If
   Me!组合框.Width = 10    ,新调整的组合框宽度
   
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70    ,打印特定记录
    DoCmd.PrintOut acSelection
   
   Me!组合框.Width = 5.603   ,原始组合框宽度
5#
发表于 2008-12-17 11:00:47 | 只看该作者
你是打印报表啊,还以为是打印,组合框的值列表。
你将代码放在什么事件中
最后一句应该去掉,否则组合框的宽度不是又回去了。
6#
 楼主| 发表于 2008-12-17 15:21:20 | 只看该作者
斑竹我不是打印报表,我打印的就是组合框的值列表,就是一个窗体中的组合框,组合框中某些值超过了组合框的宽度,我想达到的目的就是:窗体中的组合框在显示的时候必须是固定宽度,也就是不变的,但是当打印窗体的时候,组合框中的所有数据都必须打印出来。我上面的代码最后一句就是把组合框调整回原来的宽度阿,斑竹你没有仔细看我的代码思路,55555
7#
发表于 2008-12-17 15:25:47 | 只看该作者
不是没有看,而是看不懂你要干什么?(早说你要打印窗体嘛)
为什么要直接打印窗体,这种方式不建议。
建议解决办法:
将窗体另存为报表,然后在设计视图中设计您的报表,使其完整显示您的数据,
然后,打印该报表。
8#
 楼主| 发表于 2008-12-17 17:15:12 | 只看该作者
郁闷阿,俺对报表不是很熟阿
9#
发表于 2008-12-17 19:30:05 | 只看该作者
原来你对报表不熟,就打印窗体,
如果对窗体也不熟的话,是不是打印表呀。
10#
发表于 2008-12-19 16:03:52 | 只看该作者
不管是打印窗体还是打印报表也好
最好的办法是打印方案和显示方案不是同一个窗体或者报表
很简单的,把窗体复制粘贴重命名一个,在新窗体中稍微修改一下,达到满意的打印效果,在老窗体用一个命令按钮调用新窗体打印不就可以了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-13 17:39 , Processed in 0.086771 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表