Родились сегодня:
vladymyrlem
antonovich


Лидеры рейтинга

ID: 226425

Konstantin Shvetski

Модератор

740

Россия, Северодвинск


ID: 259041

Алексеев Владимир Николаевич

Мастер-Эксперт

322

Россия, пос. Теплоозёрск, ЕАО


ID: 401284

Михаил Александров

Академик

277

Россия, Санкт-Петербург


ID: 325460

CradleA

Мастер-Эксперт

210

Беларусь, Минск


ID: 137394

Megaloman

Мастер-Эксперт

129

Беларусь, Гомель


ID: 400815

alexleonsm

6-й класс

129


ID: 400669

epimkin

Профессионал

119


8.8.15

09.05.2021

JS: 2.8.21
CSS: 4.5.5
jQuery: 3.6.0
DataForLocalStorage: 2021-05-13 03:16:01-standard


Создание программ на языке Basic.

Администратор раздела: Андреенков Владимир (Академик)

Консультация онлайн # 159818

Раздел: Basic
Автор вопроса: Ципихович Эндрю
Дата: 06.02.2009, 23:57 Консультация закрыта
Поступило ответов: 0

Уважаемые эксперты, подскажите пожалуйста, после перехода к полю № 1 (ГоТо Филдс (1)) как указать условие, если это поле равно нулю, то? Спасибо

Ответов пока не поступило

Мини-форум консультации # 159818
Тесленко Евгений Алексеевич

1

= общий =    07.02.2009, 16:08

Здравствуйте Ципихович Эндрю.
Поля бывают разные (кроме тех на которых растет травка), существует много объектов именуемых полями.
Если речь идет о поле формы, проверку "содержимого" можно выполнить в обработчике события:
VB - TextBox1_GotFocus()
VBA - TextBox1_Enter()

Код
...
If Len(TextBox1.Text) = 0 Or TextBox1.Text = "0" Then
...


GoTo - переводит выполнение кода на указанную метку, и не используется в обращении к объектам формы.
Application.Goto - переход к именованной метке документа (ячейке, диапазону).

Евгений.

Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.

Лучшие эксперты раздела

Megaloman

Мастер-Эксперт

Рейтинг: 129

solowey

Профессор

Рейтинг: 20

Sergey V. Gornostaev

Профессионал

Рейтинг: 1

SFResid

Мастер-Эксперт

Рейтинг: 1

Асмик Гаряка

Советник

Рейтинг: 0

Роман Селиверстов

Советник

Рейтинг: 0