Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.74/19: Рейтинг темы: голосов - 19, средняя оценка - 4.74
 Аватар для EdMi4
3 / 3 / 1
Регистрация: 12.05.2011
Сообщений: 118

Создание Плавно открывающейся формы

13.05.2011, 08:55. Показов 3857. Ответов 22
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Лазил по вашему форумо и нашол очень забавный пример кода, программа открывается плавно появляясь можно сказать из воздуха, но пример этого кода меня просто убил! Зачем нужен такой длинный код если можно уложится в три строчки. например:
Добовляем Timer называем его Timer1 ставим Значение Enabled = true
а Interval = 50
далее в саму форму вставляем этот пример кода
VB.NET
1
2
3
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If Me.Opacity <> 1.0 Then Me.Opacity = Me.Opacity + 0.1 Else Timer1.Enabled = False
    End Sub
Готово

Добавлено через 2 минуты
Лучше примера быть неможет

Добавлено через 1 минуту
Буду очень благодарен если кто нибудь дас пример этого кода на C#
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.05.2011, 08:55
Ответы с готовыми решениями:

Есть ли способ плавно вывести бордер при наведении, ну и плавно скрыть
Необходимо плавно вывести границу при наведении, и плавно чтобы скрывалась если убрать курсор. Что можете посоветовать?

Вывести изображение плавно переходящей кривой, не выходящей за пределы формы
рандомная прямая ввести изображение плавно переходящей кривой , не выходящей за пределы формы.

Разработать приложение, обладающее возможностью плавно изменять цвет формы
Разработать приложение, обладающее возможностью плавно изменять цвет формы при перемещении указателя мыши по формк: (a) левая границы...

22
PB
Просто прогер
1292 / 1079 / 13
Регистрация: 13.03.2009
Сообщений: 2,502
14.05.2011, 01:43
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от gaw Посмотреть сообщение
и буду благодарен короткому на VB 6.0
Вся фишка в том, что на VB 6 будет тоже самое, ведь использована WinAPI функция AnimateWindow.
0
 Аватар для EdMi4
3 / 3 / 1
Регистрация: 12.05.2011
Сообщений: 118
14.05.2011, 03:19  [ТС]
Цитата Сообщение от Dzhej-Dzhej Посмотреть сообщение
Form1()
{
InitializeComponent();
this.Opacity = 0;
}
private void timer1_Tick(object sender, EventArgs e)
{
if (this.Opacity != 1.0)
this.Opacity = this.Opacity + 0.1;
else
timer1.Enabled = false;
}
Ошибочка, ругается на Void и Form1
0
Заблокирован
16.05.2011, 10:36
Цитата Сообщение от EdMi4 Посмотреть сообщение
Ошибочка, ругается на Void и Form1
полный код(добавляем на форму таймер):
C#
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
using System;
using System.Collections.Generic;
using System.Windows.Forms;
 
namespace WindowsFormsApplication31
{
    public partial class Form1 : Form
    {
        private Timer timer1;
        private System.ComponentModel.IContainer components;
        /// <summary>
        /// The main entry point for the application.
        /// </summary>
        [STAThread]
        static void Main()
        {
            Application.Run(new Form1());
        }
        Form1()
        {
            InitializeComponent();
            this.Opacity = 0;
        }
 
        private void InitializeComponent()
        {
            this.components = new System.ComponentModel.Container();
            this.timer1 = new System.Windows.Forms.Timer(this.components);
            this.SuspendLayout();
            // 
            // timer1
            // 
            this.timer1.Enabled = true;
            this.timer1.Tick += new System.EventHandler(this.timer1_Tick);
            // 
            // Form1
            // 
            this.ClientSize = new System.Drawing.Size(292, 273);
            this.Name = "Form1";
            this.ResumeLayout(false);
        }
 
        private void timer1_Tick(object sender, EventArgs e)
        {
            if (this.Opacity != 1.0) 
                this.Opacity = this.Opacity + 0.1;
            else 
                timer1.Enabled = false;
        }
    }
}
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.05.2011, 10:36

[codestyle]Пробел перед открывающейся скобкой
Всем добрый день. Я заметил, что ставлю пробелы перед скобками на автомате. Например, в вызове функции пробел не использую, в то время,...

Обрезать фразу на первой открывающейся скобке
До сих пор беда с регулярками. Есть фраза: Кровать (Венге) как составить регулярку, чтобы на выходе нам отдавалось только: Кровать ?

Как убрать звук открывающейся двери?
Меня просто бесит звук при открывании двери и интересно, а его можно как-то технически убрать или такое невозможно? Может быть если вызвать...

Ввод только цифр после открывающейся скобки
Как сделать чтобы после открытой скобки &quot;(&quot; можно было ввести только числа и потом скобку можно было закрыть? Например ввести...

Создание формы внутри фрейма и передача результата из формы между фреймами
Доброго времени суток! Столкнулся с проблемой при создании фреймов и опросника внутри фрейма. Само задание выглядит так: 1....


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

Или воспользуйтесь поиском по форуму:
23
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru