подпись к полю сделать в самом поле

Александра-Александра

Дата: 08.03.2008 23:34:24

Здравствуйте!

Можно ли подпись к полю сделать в самом поле, а если кликнуть на это поле, то чтобы надпись пропала и можно было бы в этом поле написать текст?

Спасибо...

С уважением,

Александра

ratboy

Дата: 08.03.2008 23:41:32

Private Sub Cena_otp_GotFocus()
If Me.Cena_otp = 0 Then
Me.Cena_otp = ""
Else
End If
End Sub

Private Sub Cena_otp_LostFocus()
If Me.Cena_otp = "" Then
Me.Cena_otp = 0
ElseIf IsNull(Me.Cena_otp) Then
Me.Cena_otp = 0
End If
End Sub

При установки фокуса в поле 0 убирается если он там стоит, если введено другое значение - оно остается. Если значение не вводилось - при потере фокуса опять получается 0

Александра-Александра

Дата: 09.03.2008 00:01:51

ratboy

Спасибо большое...работает...:)

Александра-Александра

Дата: 09.03.2008 00:38:52

А как быть, в случае, если в одном поле в "Input Mask" я указываю "Password"?
Тогда вместо названия в поле - только звездочки...

mds_world

Дата: 09.03.2008 02:00:37

С праздником, Александра!

Попробуйте вариант

Александра-Александра

Дата: 09.03.2008 02:16:39

mds_world

С праздником, Александра!

Попробуйте вариант

Спасибо!
Сегодня раздача подарков?:)

Не открывается пример... У меня Аксесс2000...

mds_world

Дата: 09.03.2008 02:21:44

Преобразовал

Александра-Александра

Дата: 09.03.2008 02:34:31

mds_world

Преобразовал

Да... хитрый способ... :)

Спасибо...

Александра-Александра

Дата: 09.03.2008 11:56:14

Александра-Александра

Можно просто:

На GotFocus:
Me.Text5.InputMask = "Password"

На LostFocus:
Me.Text5.InputMask = ""