Поочередное отображение панелей

@Евгений290588 · Регистрация: 21.11.2010

Студворк — интернет-сервис помощи студентам

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Public Class test1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Panel2.Visible = False
        Panel3.Visible = False
        Panel1.Visible = True
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Panel1.Visible = False
        Panel3.Visible = False
        Panel2.Visible = True
    End Sub
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Panel1.Visible = False
        Panel2.Visible = False
        Panel3.Visible = True
    End Sub
End Class

почему работает только третья кнопка, а на остальные нажимаю и пустота!!((((

@Сергей.NET · 09.01.2011, 18:18

я изменил свойство panel borderstyle= fixedsingle и все стало работать , попробуй!

@Евгений290588 · 09.01.2011, 19:19 **[ТС]**

Сообщение от StaRterprog

я изменил свойство panel borderstyle= fixedsingle и все стало работать , попробуй!

странно я для каждой панели изменил на fixedsingle и всё по старому работает только третья кнопка

@lancer2404 · 10.01.2011, 15:34

Евгений290588, У вас случайно панели не наложены друг на друга?

@Евгений290588 · 10.01.2011, 16:15 **[ТС]**

Сообщение от lancer2404

Евгений290588, У вас случайно панели не наложены друг на друга?

наложены!)))) так мне и нужно так!

@Pe4eNEG · 10.01.2011, 16:20

Скорее всего панели находятся друг на друге)) в свое время столкнулся с тем же самым только дело было с GroupBox

блин не заметил

Сообщение от lancer2404

Евгений290588, У вас случайно панели не наложены друг на друга?

@lancer2404 · 10.01.2011, 16:21

Дело в том что я буквально пару дней назад столкнулся с этой проблемой.Решил так:
1)Берем панель1 ставим куда нужно.Остальные панели разъединяем по углам.
2)Смотрим координаты панели 1.Они к примеру 218;150
Выделяем панель 2 и задаем координаты панели1 но вычитаем по единице(на всякий случай)
Получаем координаты 217;149
3)Проделываем манипуляции с панелью 3.Прибавляем единицу. (219;151)
Готово! Но нужно помнить если будете таскать мышкой панели они опять вложаться в друг друга.

@Сергей.NET · 10.01.2011, 16:27

А у меня работает

Добавлено через 5 минут
Попробуй добавить это

VB.NET
1
2
3
4
5
 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Panel1.Visible = False
        Panel2.Visible = False
        Panel3.Visible = False
    End Sub

@Pe4eNEG · 10.01.2011, 16:31

Это легко проверить если посмотреть структуру проекта: при активной вкладке с формой зайдите в вид --- структура проекта (вроде так, могу ошибаться т.к. на работе и ВБ под рукой нет), появиться панель инструментов на которой будет видно как расположены ваши панели - одна в другой или все поверх друг друга.

Добавлено через 2 минуты
вспомнил нажмите сначала CTRL+W затем U и панель появиться

И для удобства если будет еще больше панелей лучше сделать так:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Public Class test1
    Public Sub Hide_panel
        Panel2.Visible = False
        Panel3.Visible = False
        Panel1.Visible = False
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Hide_panel()
        Panel1.Visible = True
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Hide_panel()
        Panel2.Visible = True
    End Sub
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Hide_panel()
        Panel3.Visible = True
    End Sub
End Class

@Сергей.NET · 10.01.2011, 16:33

Сообщение от Pe4eNEG

одна в другой или все поверх друг друга.

я смотрю на координаты

@Pe4eNEG · 10.01.2011, 16:40

to Евгений290588: как я понял Вы пишите программу для тестирования, если будут вопрсы пишите в личку или в аську. Потому что это была тема моей курсовой которую я сейчас заканчиваю)

@Евгений290588 · 10.01.2011, 18:32 **[ТС]**

Сообщение от lancer2404

Дело в том что я буквально пару дней назад столкнулся с этой проблемой.Решил так:
1)Берем панель1 ставим куда нужно.Остальные панели разъединяем по углам.
2)Смотрим координаты панели 1.Они к примеру 218;150
Выделяем панель 2 и задаем координаты панели1 но вычитаем по единице(на всякий случай)
Получаем координаты 217;149
3)Проделываем манипуляции с панелью 3.Прибавляем единицу. (219;151)
Готово! Но нужно помнить если будете таскать мышкой панели они опять вложаться в друг друга.

спасибо!помогло!!!интересно почему нельзя одинаковые координаты ставить!(((

@Сергей.NET · 10.01.2011, 18:35

Сообщение от Евгений290588

интересно почему нельзя одинаковые координаты ставить!(((

у меня с одинаковыми координатами работает

@lancer2404 · 10.01.2011, 19:45

Я же написал на всякий случай, мне так удобнее управлять панелями. Экспериментируйте!

@Евгений290588 · 11.01.2011, 14:55 **[ТС]**

я понял эти панели нужно накладывать в определённой последовательности!!!! теперь у меня тоже с одинаковыми координатами работают!)))

Добавлено через 1 минуту

Сообщение от Pe4eNEG

to Евгений290588: как я понял Вы пишите программу для тестирования, если будут вопрсы пишите в личку или в аську. Потому что это была тема моей курсовой которую я сейчас заканчиваю)

Спасибо если что напишу!!!)

@Хан Соло · 20.03.2013, 00:21

слухайте, тема похожая, только у меня вот надо чтобы при нажатии на одну и ту же кнопку панель то появлялась то исчезала, это как сделать?

@MickeS · 20.03.2013, 10:18

Вот так пойдёт?

VB.NET
1
2
3
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Panel1.Visible = Not Panel1.Visible
    End Sub

@Евгений290588 · 21.03.2013, 10:04 **[ТС]**

Сообщение от Хан Соло

слухайте, тема похожая, только у меня вот надо чтобы при нажатии на одну и ту же кнопку панель то появлялась то исчезала, это как сделать?

Вот здесь почитай http://msdn.microsoft.com/ru-r... sible.aspx

21.03.2013, 17:37

Сообщение от Евгений290588

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Public Class test1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Panel2.Visible = False
        Panel3.Visible = False
        Panel1.Visible = True
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Panel1.Visible = False
        Panel3.Visible = False
        Panel2.Visible = True
    End Sub
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Panel1.Visible = False
        Panel2.Visible = False
        Panel3.Visible = True
    End Sub
End Class

почему работает только третья кнопка, а на остальные нажимаю и пустота!!((((

Я конечно наверное уже опоздал со своим решением, но все же расскажу как избежать этой пустоты в будущем.

Кароче смысл в том, что у тебя все 3 панели (не важно панели это или ЛЮБОЙ другой элемент) наложены друг на друга, скажем они идут по порядку 1,2,3 и когда ты хочешь скрыть 1 и 3 и показать 2-ой он у тебя виден не будет, т.к. его закрывает невидимый 3-ый контрол.
Тебе всего-навсего нужно было добавить под 1-ой строчке в каждую твою кнопку, что бы все заработало на ура.
Есть такое понятие как z-index, так вот он отвечает за то, какой элемент (страници или программы) будет, скажем так, на верхнем слое - это как в word-е кнопки - передний и задний план.
Это свойство есть у каждого контрола, что бы еще дольше не мусолить эту тему, вот тебе код

VB.NET
1
2
Panel1.BringToFront() 'это свойство помещает панель "на верхний слой", т.е на передний план
Panel1.SendToBack()

'это на задний план.

Надеюсь я не офтоплю и мои познания немного помогли.

Кстати приемы с z-index-ами используются часто в сайтах, когда нужно заблокировать основное содержимое сайта и вывести на передний план какую-нибудь табличку, ей присваивают z-index = 999 и эта табличка не дает ничего сделать с остальным сайтом, пока не закроется эта табличка, как-то так^_^

@Евгений290588 · 21.03.2013, 20:00 **[ТС]**

Сообщение от Lord_LMM

Я конечно наверное уже опоздал со своим решением, но все же расскажу как избежать этой пустоты в будущем.

Кароче смысл в том, что у тебя все 3 панели (не важно панели это или ЛЮБОЙ другой элемент) наложены друг на друга, скажем они идут по порядку 1,2,3 и когда ты хочешь скрыть 1 и 3 и показать 2-ой он у тебя виден не будет, т.к. его закрывает невидимый 3-ый контрол.
Тебе всего-навсего нужно было добавить под 1-ой строчке в каждую твою кнопку, что бы все заработало на ура.
Есть такое понятие как z-index, так вот он отвечает за то, какой элемент (страници или программы) будет, скажем так, на верхнем слое - это как в word-е кнопки - передний и задний план.
Это свойство есть у каждого контрола, что бы еще дольше не мусолить эту тему, вот тебе код

VB.NET
1
2
Panel1.BringToFront() 'это свойство помещает панель "на верхний слой", т.е на передний план
Panel1.SendToBack()

'это на задний план.

Надеюсь я не офтоплю и мои познания немного помогли.

Кстати приемы с z-index-ами используются часто в сайтах, когда нужно заблокировать основное содержимое сайта и вывести на передний план какую-нибудь табличку, ей присваивают z-index = 999 и эта табличка не дает ничего сделать с остальным сайтом, пока не закроется эта табличка, как-то так^_^

спасибо! полезная инфа!)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .

@Сергей.NET Программист 416 / 416 / 7 Регистрация: 10.09.2010 Сообщений: 1,344
	09.01.2011, 18:18
	я изменил свойство panel borderstyle= fixedsingle и все стало работать , попробуй! 0

@lancer2404 903 / 12 / 1 Регистрация: 02.10.2010 Сообщений: 136
	10.01.2011, 15:34
	Евгений290588, У вас случайно панели не наложены друг на друга? 0

@lancer2404 903 / 12 / 1 Регистрация: 02.10.2010 Сообщений: 136
	10.01.2011, 16:21
	Дело в том что я буквально пару дней назад столкнулся с этой проблемой.Решил так: 1)Берем панель1 ставим куда нужно.Остальные панели разъединяем по углам. 2)Смотрим координаты панели 1.Они к примеру 218;150 Выделяем панель 2 и задаем координаты панели1 но вычитаем по единице(на всякий случай) Получаем координаты 217;149 3)Проделываем манипуляции с панелью 3.Прибавляем единицу. (219;151) Готово! Но нужно помнить если будете таскать мышкой панели они опять вложаться в друг друга. 0

@Pe4eNEG 123 / 123 / 12 Регистрация: 12.06.2010 Сообщений: 499 Записей в блоге: 2
	10.01.2011, 16:40
	to Евгений290588: как я понял Вы пишите программу для тестирования, если будут вопрсы пишите в личку или в аську. Потому что это была тема моей курсовой которую я сейчас заканчиваю) 1

@lancer2404 903 / 12 / 1 Регистрация: 02.10.2010 Сообщений: 136
	10.01.2011, 19:45
	Я же написал на всякий случай, мне так удобнее управлять панелями. Экспериментируйте! 1

@Хан Соло 1 / 1 / 0 Регистрация: 19.02.2013 Сообщений: 21
	20.03.2013, 00:21
	слухайте, тема похожая, только у меня вот надо чтобы при нажатии на одну и ту же кнопку панель то появлялась то исчезала, это как сделать? 0