Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: KIP4
Значит я скорее всего нетам пишу :(. В конструкторе отчетов я выбираю поле, с которым необходимо провести данное действие, затем правой кнопкой - обработка событий - программа , мне выходит VB, в центре окно Private Sub name_smi_BeforeUpdate(Cancel As Integer) и End Sub, я ввожу между ними свой код, затем Debug -> Compile info1, затем запускаю Run -> Run Sub/User form, выходит окошко , где надо ввести имя Macro Name, я ввожу имя(test) , жму Create, справа где дерево появляется папка "Modules" и модуль Module1 и окно
Sub test()

End Sub
и тут я уже незнаю что делать, если вводить тот же код.:
Select Case name_smi
Case ([name_smi] = "ÐÎÑÁÀËÒ")
name_smi.BackColor = vbRed
Case [name_smi] = "Èçâåñòèÿ"
name_smi.BackColor = vbYellow
End Select
то ругается на name_smi что не найдет проект или библиотека :(


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.