Office中国论坛/Access中国论坛

标题: 字数显示问题,请大侠们帮忙。。多谢! [打印本页]

作者: heaky    时间: 2002-10-26 20:44
标题: 字数显示问题,请大侠们帮忙。。多谢!
在一个窗体里有一个项目,如果输入字数不超过10个就用3号字显示。如果超过10个就换成两行用4号字显示,请问如何控制呢?请各位大侠们指救。。。。。。。。
作者: aban    时间: 2002-10-27 14:04
窗体中的文本框名称为Text1。
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If Len(Text1.Text) < 9 Then
Text1.FontSize = 3
Else
Text1.FontSize = 4
End If





欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3