Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / присвоение переменной типа combobox / 4 сообщений из 4, страница 1 из 1
05.09.2013, 17:05
    #38388205
mpkfa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
присвоение переменной типа combobox
У меня в программе есть 4 комбобокса и над ними выполняются аналогичные действия. Я хотел сделать отдельную процедуру типа

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
Private Sub check1(CBox As ComboBox)

If CBox.Value > 0 And CBox.Value < 13 Then
   mes = CStr(CBox.Value)

ElseIf CBox.Text = "1 кв" Then
       mes = "1,2,3"
       mes1 = "1 кв"
ElseIf CBox.Text = "2 кв" Then
       mes = "4,5,6"
       mes1 = "2 кв"
ElseIf CBox.Text = "3 кв" Then
       mes = "7,8,9"
       mes1 = "3 кв"
ElseIf CBox.Text = "4 кв" Then
       mes = "10,11,12"
       mes1 = "4 кв"
ElseIf CBox.Text = "1Н" Then
       mes = "1,2,3,4,5,6"
       mes1 = "1H"
ElseIf CBox.Text = "2Н" Then
       mes = "7,8,9,10,11,12"
       mes1 = "2H"
End If

End Sub



И в теле программы вызывать эту процедуру как check1(Combobox2). Однако программа ругается Object required. Подскажите пожалуйста, что тут не правильно?
...
Рейтинг: 0 / 0
05.09.2013, 17:21
    #38388231
lbppb
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
присвоение переменной типа combobox
mpkfa,

А у меня не ругается. Проверьте как вы процедуру вызываете.
...
Рейтинг: 0 / 0
05.09.2013, 17:24
    #38388238
mpkfa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
присвоение переменной типа combobox
Опа, похоже ругается когда в скобках. Надо check1 Combobox2 и все работает похоже)))
...
Рейтинг: 0 / 0
05.09.2013, 17:39
    #38388274
lbppb
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
присвоение переменной типа combobox
mpkfaОпа, похоже ругается когда в скобках. Надо check1 Combobox2 и все работает похоже)))

В скобках нужно, когда результат функции присваивается переменной.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / присвоение переменной типа combobox / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]