Ошибка sub of function not defined

Программирование на Visual Basic for Applications
Dmitriy2001
Начинающий
Начинающий
 
Сообщения: 1
Зарегистрирован: 19.03.2016 (Сб) 18:32

Ошибка sub of function not defined

Сообщение Dmitriy2001 » 19.03.2016 (Сб) 18:36

Привет,программисты
Помогите,у меня тут ошибка,программировать и изучать код начал только неделю назад,вот и не знаю.
Вот код
Код: Выделить всё
Private Sub cmdВычислить_Click()
Text1(0).Text = Kolich
Text2.Text = Ctoim
Text3.Text = Stag

Premium = CSng(Text4.Text)

Oklad_itogo = Baza(Kolich, Ctoim, Stag) + Baza(Kolich, Ctoim, Stag) * Premiun / 100
Text5.Text = FormatNumber(Oklad_itogo, 2

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Re: Ошибка sub of function not defined

Сообщение Viper » 20.03.2016 (Вс) 11:27

Какая-то из вызываемых функций не определена. поскольку все телепаты в отпуске, то какая именно сказать невозможно. Скорее всего это Baza, но и Kolich, Ctoim и Stag тоже могут быть не определены. Это вообще что, переменные?
Весь мир матрица, а мы в нем потоки байтов!

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 21.03.2016 (Пн) 3:02

Dmitriy2001 писал(а):
Код: Выделить всё
Text1(0).Text = Kolich

А там точно массив полей? Может всё-таки так?
Код: Выделить всё
Text1.Text = Kolich

Dmitriy2001 писал(а):Text5.Text = FormatNumber(Oklad_itogo, 2

Эм.. А закрывающая скобка где?


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2

    TopList