|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.08.2010, 17:34 | #1 |
Пользователь
Регистрация: 28.11.2007
Сообщений: 16
|
Private Sub TextBox2_GotFocus()
Доброго Здоровья!
VBA6 Excel: На UserForm1 в TextBox1 посредством CommandButton1 вводится какое-то значение, пусть цифра 1. Необходимо, чтобы при перемещении фокуса в TextBox2, которая находится также на UserForm1 с помощью CommandButton1 единица вводилась уже в TextBox2. И при возврате фокуса в TextBox1 эта же кнопка опять "работала на TextBox1". Как это выразить в виде работающего кода (по событию)? Спасибо. |
11.08.2010, 20:44 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Примерно так:
Код:
|
11.08.2010, 23:38 | #3 |
Пользователь
Регистрация: 28.11.2007
Сообщений: 16
|
На основе Вашего примера получилось то, что было нужно (файл – в приложении). Все работает как надо. И все бы хорошо. Но на рабочей форме происходит странный глюк: Поменять окно ввода можно только один раз. После чего кнопка продолжает вводить значение в TextBox2, и на смену фокуса и положение курсора не реагирует. В чем может быть загвоздка?? Какие нибудь предположения?? :-(
Последний раз редактировалось bank_notes; 11.08.2010 в 23:41. |
12.08.2010, 12:44 | #4 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
А такой вариант.Проверил-работает
Код:
Анализ,обработка данных Недорого
|
12.08.2010, 15:37 | #5 |
Пользователь
Регистрация: 28.11.2007
Сообщений: 16
|
Dober, Спасибо за отклик. Код работает, но цель не достигнута. Суть в том, что юзер должен сам выбрать окно ввода (TextBox1 или TextBox2). В процессе работы TextBox1 может очиститься и снова понадобится ввести значение именно TextBox1…..
|
12.08.2010, 16:32 | #6 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 616
|
А если такой вариант. Добавляем на форму CheckBox1, который переключает булеву переменную, очищает один ТекстБокс и переводит фокус в другой ТекстБокс.
А по кнопке CommandButton1 записывается "text" в тот ТекстБокс, который имеет фокус. PHP код:
|
12.08.2010, 19:27 | #7 |
Пользователь
Регистрация: 28.11.2007
Сообщений: 16
|
Спасибо, Nilem. Вариант с CheckBox рассматривался и он, безусловно, работоспособен и надежен и решает проблему технически. Возможно, что придется на нем и остановиться.
Но…, как бы это выразить, нет в нем изящества…. Лишний клик…Это почти то-же самое, что создать отдельную кнопу для TextBox2… Наверняка есть другое решение… |
12.08.2010, 19:59 | #8 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 616
|
In my humble opinion, the additional condition means additional click.
ИМХО, дополнительное условие означает дополнительный клик. |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
H2269 Overriding virtual method 'TForm1.WndProc' has lower visibility (private) than base class 'TForm' | AlexanderSatorin | Общие вопросы Delphi | 2 | 27.06.2010 10:08 |
событие Private Sub Worksheet_Change | Светлана87 | Microsoft Office Excel | 5 | 11.10.2009 18:42 |
Private: public: | Swool | Общие вопросы C/C++ | 2 | 15.09.2009 13:53 |
разделы type-а: private, pub....... | Altera | Общие вопросы Delphi | 4 | 16.02.2008 17:19 |