报表上的文本框，能否根据内容的多少自动缩小字体？

phenix　发表于：2010-09-02 01:03:34 　

报表上有个文本框用来显示窗体中输入的内容，内容少自然没有问题，可内容多了在报表上就不能显示全部内容，能否在内容多的情况下，以缩小字体的方式在报表上显示？

多谢了。

王樵民发表于：2010-09-02 17:59:07

请参考下面的代码

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
If Len(药品名称) > 8 Then
Me.药品名称.FontSize = 9
Else
Me.药品名称.FontSize = 11
End If
End Sub

Top

phenix 发表于：2010-09-02 23:31:53

感谢王樵民办住的答复，问题解决了，而且在这个代码的基础上又加了一个条件，使得不同情况下的文字字体更为多样。

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
If Len(药品名称) < 8 Then
Me.药品名称.FontSize = 11
ElseIf Len(药品名称) > 14 Then
Me.药品名称.FontSize = 7
Else
Me.药品名称.FontSize =9

End If
End Sub

Top

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

Access交流中心

报表上的文本框，能否根据内容的多少自动缩小字体？