Страница: 1 |
Страница: 1 |
Вопрос: ссылка но объект
Добавлено: 24.01.09 00:07
Автор вопроса: pcn
Подскажите, как передать ссылку на объект с формы в модуль, чтобы после разных действий у определенного объекта на форме можно было бы менять свойства.
Наподобие:
Private Sub txtWord_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = ... Then MySub txtWord 'вызываем MySub и даем ссылку на объект
End Sub
Public Sub MySub(obj as Object)
.....
всякие вычисления
obj.Text = "...."
obj.SelStart = 2
End Sub
Ответы
Всего ответов: 6
Номер ответа: 1
Автор ответа:
fAndOrIn
Вопросов: 5
Ответов: 344
Профиль | | #1
Добавлено: 24.01.09 00:30
А в чем проблема? В примере все на месте и все работает.
Номер ответа: 2
Автор ответа:
pcn
Вопросов: 2
Ответов: 3
Профиль | | #2
Добавлено: 24.01.09 13:28
вчера весь вечер мучался с этим, программа переменной obj приравнивала не объект, а txtWord.Text
Вылезала ошибка, вот и полез на форум спрашивать.
а с утра все работает как надо....
Номер ответа: 3
Автор ответа:
Isage.ru
Вопросов: 3
Ответов: 38
Профиль | | #3
Добавлено: 24.01.09 20:09
В большинстве случаев помогает RESET OS.
Номер ответа: 4
Автор ответа:
Winand
Вопросов: 87
Ответов: 2795
Web-сайт:
Профиль | | #4
Добавлено: 24.01.09 20:41
гыгы помогает учавстие в Windows Uninstall Party
Номер ответа: 5
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #5
Добавлено: 24.01.09 20:57
Неисповедимы пути мелкомягких.
Номер ответа: 6
Автор ответа:
GDK
Вопросов: 13
Ответов: 348
Профиль | | #6
Добавлено: 28.01.09 12:58
А у меня в один "прекрас." день макрос стал работать через зад. Короче из за вируса.