Office中国论坛/Access中国论坛

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

作者: heaky 时间: 2002-10-26 20:43
标题: 字数显示问题，请大侠们帮忙。。多谢！
在一个窗体里有一个项目，如果输入字数不超过10个就用3号字显示。如果超过10个就换成两行用4号字显示，请问如何控制呢？请各位大侠们指救。。。。。。。。

作者: aban 时间: 2002-10-27 07:09
窗体中的文本框名称为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/)