Страница: 1 |
Страница: 1 |
Вопрос: Помогите
Добавлено: 30.05.08 15:23
Автор вопроса: Natasha | ICQ: 209576706
Подскажите пожалуйста как прописать в vB, чтоб при проставлении галочки в checkBox отображались другие строчки . А когда галочку убираешь, чтоб они скрывались. Эти строчки, которые должны скрываться тоже содержат checkbox
Ответы
Всего ответов: 14
Номер ответа: 1
Автор ответа:
Natasha
ICQ: 209576706
Вопросов: 1
Ответов: 4
Профиль | | #1
Добавлено: 30.05.08 17:04
Private Sub CheckBox48_Click()
If CheckBox48.ListIndex = 0 Then
CheckBox29.Visible = False
CheckBox30.Visible = False
CheckBox49.Visible = False
Rows("53:55".EntireRow.Hidden = True
Else
CheckBox29.Visible = True
CheckBox30.Visible = True
CheckBox49.Visible = True
Rows("53:55".EntireRow.Hidden = False
End If
End Sub
Что надо изменить. А то ошибку выдает
Номер ответа: 2
Автор ответа:
s12
Вопросов: 24
Ответов: 363
Профиль | | #2
Добавлено: 31.05.08 00:50
???
ОЙ ржунимагу. телепаты в студию...
Свойство "ListIndex" у чекбокса, это что-то новенькое, если хочется проверить есть ли галка то надо
А вот это. Что это?
Rows("53:55".EntireRow.Hidden = True
ВСЕ!
ЗЫ: Напиши лучше что за задачу ты делаешь, помогут быстрее.
Номер ответа: 3
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #3
Добавлено: 31.05.08 16:37
угу, а еще лучше условие.
Номер ответа: 4
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #4
Добавлено: 31.05.08 16:41
А на что-то большее чем стёб вы способны?
Номер ответа: 5
Автор ответа:
Smith
ICQ: ненавижу
Вопросов: 28
Ответов: 317
Web-сайт:
Профиль | | #5
Добавлено: 31.05.08 16:48
Тут человек ничего не понимая пытается что-то сделать, да один уже энтузиазм заслуживает поощрения.
Natasha таким способом ты не добьёшься ничего.
Освети всю задачу в целом.
Тебе нужен список элементов, каждый из которых можно отметить галоской.
И при отметке под ним будет выпадать ещё список и тоже с возможностью отметки галочкой и так далее.
Номер ответа: 6
Автор ответа:
Smith
ICQ: ненавижу
Вопросов: 28
Ответов: 317
Web-сайт:
Профиль | | #6
Добавлено: 31.05.08 16:53
Это действительно не похоже на VB, это ближе к VBA, может ты не в тот раздел написала?
Эти строчки у тебя в документе? Или где?
Номер ответа: 7
Автор ответа:
Natasha
ICQ: 209576706
Вопросов: 1
Ответов: 4
Профиль | | #7
Добавлено: 02.06.08 13:46
Вот эту строчку я и поменяла If CheckBox48.ListIndex = 0 Then
и все заработало.
Номер ответа: 8
Автор ответа:
Natasha
ICQ: 209576706
Вопросов: 1
Ответов: 4
Профиль | | #8
Добавлено: 03.06.08 15:53
Хотя появился другой вопрос.
Задача.
Есть "лист 1"
и "Лист 2"
На "Лист1" список позиций и Checkbox. ( Точнее напротив каждой позиции Checkbox)
на 2 листе тот же самый список
Надо сделать так чтобы при проставлении галочки на "Листе1" эта позиция отображалась на "Лист2"
А все позиции где галочка не стоит чтоб скрывались
Номер ответа: 9
Автор ответа:
s12
Вопросов: 24
Ответов: 363
Профиль | | #9
Добавлено: 04.06.08 01:39
Если я все правильно понял (с чем последнее время проблемы), то вот это должно тебе помочь:
Private Sub Form_Load()
'заполняем Лист(0)
List1(0).AddItem ("qwerty1"
List1(0).AddItem ("qwerty2"
List1(0).AddItem ("qwerty3"
List1(0).AddItem ("qwerty5"
List1(0).AddItem ("qwerty6"
End Sub
Private Sub List1_Click(Index As Integer)
If Index = 0 Then
'Клик по Лист(0)
List1(1).AddItem List1(0).List(List1(0).ListIndex)
Else
'Клик по Лист(1)
List1(1).RemoveItem List1(1).ListIndex
End If
End Sub
Номер ответа: 10
Автор ответа:
s12
Вопросов: 24
Ответов: 363
Профиль | | #10
Добавлено: 04.06.08 01:41
Пояснение: List1 - коллекция из двух листбоксов
Номер ответа: 11
Автор ответа:
Winand
Вопросов: 87
Ответов: 2795
Web-сайт:
Профиль | | #11
Добавлено: 04.06.08 02:36
(Лист1 и Лист2, а ведь реально так называют контролы! замкчаешься раскладку переключать)
Номер ответа: 12
Автор ответа:
Natasha
ICQ: 209576706
Вопросов: 1
Ответов: 4
Профиль | | #12
Добавлено: 04.06.08 11:25
хм....понятно...точнее ничего не понятно((((
Номер ответа: 13
Автор ответа:
s12
Вопросов: 24
Ответов: 363
Профиль | | #13
Добавлено: 05.06.08 10:18
Ну че тут нипонятного??? Берешь форму рисуешь на ней листбокс, выделяешь его, нажимаешь CTRL+C, а потом CTRL+V, открываешь редактор кода и всавляешь туда пример, ФСЕ!
Номер ответа: 14
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #14
Добавлено: 05.06.08 10:20
Плавали, знаем, в VBA контролы не индексируются в массив.