Отобразить всплывающую подсказку
PMVolga
Дата: 10.01.2012 12:32:50
Добрый день!
Кто-нибудь знает как программно отобразить всплывающую подсказку к текст боксу в 2007/2010 аксессе?
полином
Дата: 10.01.2012 12:38:13
свойство control tip text
PMVolga
Дата: 10.01.2012 12:43:14
полином,
Спасибо. Так присваивается текст в подсказку, а как ее отобразить из VBA???
полином
Дата: 10.01.2012 12:58:41
а в чем сложность-то?
Me.ControlName.ControlTypeText = "ваш текст тут"
PMVolga
Дата: 10.01.2012 13:20:11
полином,
Сложность не в присвоении, а в отображении. Мне интересно запихать туда проверку на правильность ввода данных в текст бокс. К примеру вводит юзер текст больше положенного, ему всплывает подсказка: "Текст слишком длинный".
кактотак
Дата: 10.01.2012 13:39:55
PMVolga |
---|
интересно запихать туда проверку на правильность ввода данных в текст бокс. К примеру вводит юзер текст больше положенного, ему всплывает подсказка: "Текст слишком длинный". |
Например на событие change()
if len(поле.text)>5 then
поле.controltiptext:="текст"
else
поле.controltiptext:=""
end if
полином
Дата: 10.01.2012 13:41:02
Private Sub ControlName_Change()
If Len(Me.ControlName.Text) > 10 Then
Me.ControlName.ControlTipText = "Текст слишком длинный"
Else
Me.ControlName.ControlTipText = "Введите текст в поле"
End If
End Sub
а вообще такие ограничения указывают в ValidationRule в таблице, там же пишут и ValidationText
PMVolga
Дата: 10.01.2012 14:01:23
кактотак,
Присвоить то мы присвоили, а как тут же его показать. Если использовать предложенный код, то подсказка всплывет тогда, когда на текст бокс будет наведен курсор мыши. А как сделать, так, чтобы она сразу всплыла?