Страницы: 1
RSS
Изменение цвета шрифта в TextBox при (не)соответствии первых символов, Изменение цвета шрифта в TextBox при (не)соответствии первых символов
 
Добрый день!
Помогите с кодированием формы
Хочу вводить слова в TextBox c PasswordChar и сверять их с вводимыми с другого TextBox'a
таким образом чтобы при совпадении первых символов цвет **** был зеленым, а при несовпадении менялся на красный
т.е. : мама   ****=мам*
       мама   ****=ман*
Заранее благодарен за помощь!
 
проверяет вводимый в textbox2 текст с текстом в textbox1
Код
Private Sub TextBox2_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
s = TextBox2.Value & "*"
If TextBox1.Value Like s Then TextBox2.ForeColor = vbGreen Else TextBox2.ForeColor = vbRed
End Sub

Дальше я думаю сами интегрируете

Изменено: magistor8 - 14.02.2019 12:38:31
 
magistor8,вот спасибо! помог!
правда заменил KeyUp на Change и все полетело как надо
 
Вариант.
"Все гениальное просто, а все простое гениально!!!"
 
Nordheim,Спасибо! Хороший вариант
Страницы: 1
Наверх