如何控制报表中的文本框字体的大小？

殷小宝　发表于：2012-04-03 21:17:47 　

在文本框里如果字符数超过8个，那么设置此文本框的FontSize为10，否则为11号字体。代码如下：

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)

    Me.药品名称.FontSize = 11    '每次主体格式化时，先将字体设为正常大小

    If Len(Me.药品名称) > 8 Then

        Me.药品名称.FontSize = 10
        Else
         Me.药品名称.FontSize = 11
    End If
End Sub

结果是在大于8个字的文本框后面的[药品名称]文本框内的字符大小全是10号，请问怎么能在不符合条件下将文本框的字体大小改为11号呢？

Top

落尘_小新发表于：2012-04-03 21:58:28

你这代码，我试了一下，没产问题啊。

你看这是我运行的结果。

为了看的更清楚，我只是把当条件为假时字号改为14，以及第一句代码中字号也改为14而以。

你看看是不是你报表中还有别的什么代码的问题呢。

Top

殷小宝发表于：2012-04-03 22:21:01

因为打了一个有8个字的报表，感觉到此字符与上面的10的字符的大小一样小，没有最上面的11号字大，所以觉得有问题，于是发了帖子。看到了你的贴子又重新试了一下，后面的字符又变大起来了。于是认定你是对的。谢谢楼上的回答。

Top

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

Access交流中心

[5分]如何控制报表中的文本框字体的大小？