2009-07-11 3 views
1

Я хочу создать свой экран запуска с индикатором выполнения. Но я не обрабатываю процесс CPU.ProgressBar in vb.net 2005

Может ли кто-нибудь помочь мне решить этот код?

Спасибо, Sopolin

+0

Не могли бы вы прояснить вопрос? Вам нужен заставка при загрузке приложения? Что вы подразумеваете под «процессом процессора»? – crb

+0

Знаете ли вы экран запуска? Пример: Окно, когда он запускается, загружает экран запуска с индикатором выполнения? – Sopolin

+0

Есть ли какие-либо из приведенных ниже, что я только что добавил? – spacemonkeys

ответ

0

Вы уже проектировали свою заставку? И отображение правильно?

Индикаторы выполнения, которые отображаются во время запуска, отображают процесс запуска приложения, например, вы можете иметь 3 процесса, которые приложение выполняет при запуске, инициализировать переменную, открывать соединение с базой данных, загружать конфигурацию. Вы дали бы каждому из них в процентах в строке состояния и как они будут завершены, установите индикатор этого значения

Извините, если я пропустил свою точку

бар Прогресс сам прост в использовании, установить минимальное и максимальное значение (я поставил его на 100 до repressent 100%)

progressBar1.Maximum = 100 
progressBar1.Manimum=0 

А затем установить величину процентного сделать с помощью команды, как

progressBar1.Value = 20 

Более подробную информацию можно найти на сайте

Progress bar

- Для того, чтобы добавить заставку

Чтобы добавить заставку в приложение, в обозревателе решений, нажмите кнопку Добавить новый элемент -> экран выплеска, то, если вы для свойств проекта (explorer) в нижней части экрана приложения, это заставка, выберите форму, которую вы хотите использовать в качестве заставки, чтобы индикатор выполнения использовал код выше (вы будете необходимо отбросить индикатор выполнения из панели инструментов на форму)

+0

Я принимаю ваш ответ, но я новый программист. Да, я хочу создать экран запуска. Я не умею конструировать или писать код с индикатором выполнения. – Sopolin

+0

Я добавил код в ответ, надеюсь, он поможет – spacemonkeys

+0

Спасибо за ваш проводник. – Sopolin

1
Public Class Form4 

    Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    On Error Resume Next 
    Dim x, p As Integer 
    ProgressBar1.Maximum = 100 
    ProgressBar1.Step = 1 
    For x = 0 To 100 
     ProgressBar1.Value = p 
     p = p + 1 
    Next 
    // any other action 
    End Sub 
End Class