Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
KOTIK_Rus
0 / 0 / 0
Регистрация: 16.12.2015
Сообщений: 1
1

Задача с флажками CheckBox

16.12.2015, 23:53. Просмотров 944. Ответов 1
Метки нет (Все метки)

Добрый день, пытался разобраться со своей проблемой сам, но ничего не получается, информации вроде дополнительной тоже не нашел. В общем, при вводе в соответствующие окна данных помещения (длина, ширина и высота), а также выбор на вкладке "Отделка пола" различных параметров (выпадающий список и флажки), при нажатии кнопки расчитать внизу в окне справа от надписи "Пол" высчитывается значение.
Проблема возникла при определении значения в окошке CheckBox. Т.е. при подсчете автоматически учитываются оба объекта CheckBox независимо от того, отмечены ли они флажком или нет.
Конкретно проблема находится в этой части кода:
Visual Basic
1
2
3
4
5
6
7
8
Select Case CheckBox1
    Case CheckBox1.Value = True: Pol_Lin_1 = 38 * STB
    Case CheckBox1.Value = False: Pol_Lin_1 = 0
    End Select
    Select Case CheckBox2
    Case CheckBox2.Value = True: Pol_Lin_2 = 46 * STB
    Case CheckBox2.Value = False: Pol_Lin_2 = 0
End Select
Может быть кто-то встречался с подобной проблемой уже?
0
Вложения
Тип файла: rar CheckBox.rar (18.5 Кб, 5 просмотров)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.12.2015, 23:53
Ответы с готовыми решениями:

Простая задача с CheckBox
Здравствуйте! В общем задачка простая, необходимо сделать так,чтобы при активации CheckBox...

Перебор CheckBox для создания новых листов с названием из CheckBox.Caption
Привет всем! Для каждого CheckBox получается сделать. У меня их больше 20. Возможно ли...

Как одновременно поменять свойство value у checkbox с true на false для всех checkbox-ов, находящихся на одном листе?
Всем добрый день! Подскажите, пожалуйста, как одновременно поменять свойство value у checkbox с...

Checkbox на Userform. Как создать мультивыбор Checkbox
Добрый день! Прошу помощи реализовать код для возможности мультивыбора Checkbox. Каждый Checkbox...

Поле с "флажками" в Access 2010
Доброго времени суток господа программисты ! Помогите пожалуйста с иллюстрацией кода на VBA: ...

1
pashulka
3200 / 1705 / 720
Регистрация: 01.12.2010
Сообщений: 3,423
17.12.2015, 00:20 2
Сначала у первого "флажка" (стяжка) меняете значение свойства TripleState на False

Visual Basic
1
2
3
4
5
If ComboBox1.Value = "Линолеум" Then
   Pol_Lin_1 = IIf(CheckBox1.Value, 38 * STB, 0)
   Pol_Lin_2 = IIf(CheckBox2.Value, 46 * STB, 0)
   GO_POL = Pol_Linoleum + Pol_Lin_1 + Pol_Lin_2
End If
или

Visual Basic
1
2
3
4
5
6
7
Dim Pol_Lin_1#, Pol_Lin_2#, GO_POL# 'и т.д.
 
If ComboBox1.ListIndex = 0 Then
   If CheckBox1 Then Pol_Lin_1 = 38 * STB
   If CheckBox2 Then Pol_Lin_2 = 46 * STB
   GO_POL = Pol_Linoleum + Pol_Lin_1 + Pol_Lin_2
End If
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.12.2015, 00:20

Список с флажками
Здравствуйте. У меня имеется 3 таблицы: --"АС"(автоматизированная система), --"Помещение" и ...

Работа с флажками
День добрый. Столкнулся с проблемой: У меня простая форма в табличном представлении. На форме...

Диалог с флажками
У меня диалог с флажками, первый элемент диалога это ВЫДЕЛИТЬ ВСЕ, при его нажатии ставится галочка...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru