[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Наш сайт » Visual basic » Режим замены (текстовые окна работают в режиме вставки) в те (Режим замены (текстовые окна работают в режиме вставки) в те)
Режим замены (текстовые окна работают в режиме вставки) в те
ilimДата: Среда, 09.11.2011, 22:27 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >= 32 Then 'проверка, что вводится символ (буква или цифра)
If Text1.SelLength = 0 Then 'проверка, что текст не выделен
If Text1.SelStart < Len(Text1) Then
Text1.SelLength = 1 'данным установлением включается режим замены
End If
End If
End If
End Sub


www.ilim.kz
 
Форум » Наш сайт » Visual basic » Режим замены (текстовые окна работают в режиме вставки) в те (Режим замены (текстовые окна работают в режиме вставки) в те)
Страница 1 из 11
Поиск: