access的窗体里文字能自动换行和自动文字大小

winson　发表于：2008-12-15 11:35:43 　

复制

在我的付款人,帐号和开户行都能有自动文字大小和换行,同时打印出来也是如显示的一样

Top

钱玉炜发表于：2008-12-15 13:03:38

可以在你的帐号和开户行控件的获得焦点事件里写代码Me.帐号控件名称.FontSize = N ，Me.开户行控件名称.FontSize = N 来调整文字大小，报表里也这样设置就可以

Top

winson 发表于：2008-12-17 08:59:35

版主照着你的方法做了,报错阿

Top

today416 发表于：2008-12-17 16:03:47

我跟楼主一样的问题阿，

刚我想了个办法，就是在单击打印记录的单击事件中，添加如下代码，目的是在打印前调整组合框的宽度，然后打印，然后在恢复组合框的宽度到原来的宽度，本来以为可以，但是结果反而是打印不出数据，也就是说以前仅仅是多出来的字打印不出来，现在是打印不出任何字。为什么？
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　　　，原始组合框宽度

Top

winson 发表于：2008-12-18 20:25:30

版主照着你的方法做了,报错阿求楼主在说的明白点

Top

钱玉炜发表于：2008-12-19 14:38:09

Me.帐号控件名称.FontSize = N ，Me.开户行控件名称.FontSize = N 这里的控件名称换成你对应的控件的名称，后面的N自己设置一个值

Top

ynfsr 发表于：2008-12-22 19:29:45

楼主要求的是否是字数多了字体大小自动减小，或字数少了字体大小自动增大啊

Top

总记录：6篇页次：1/1 9 1 :

Access交流中心

access的窗体里文字能自动换行和自动文字大小