2016-05-15 4 views
-3

Я пытаюсь напечатать процентный показатель progressbar в текстовом поле. Когда я запускаю свою программу, ничего не появляется в текстовом поле. Это мой код:Печать Значение строки выполнения в текстовое поле

Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click 
     ProgressBar1.Maximum = TextBox1.Text 
    End Sub 

Справка очень ценится! Спасибо.

+0

Соответствующие части кода должны ** всегда ** быть размещены ** непосредственно ** в вашем вопросе в соответствии с [Как создать минимальный, полный и проверенный пример] (http://stackoverflow.com/help/mcve). –

+0

Кроме того, вы подумали об использовании [Таймер] (https://msdn.microsoft.com/en-us/library/system.windows.forms.timer (v = vs.110) .aspx) для постоянного обновите свой TextBox? –

ответ

0

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

Imports System.ComponentModel 

Public Class Form1 
''This will display the information to the textbox and will also load a progressbar(you can change it to something else beside a textbox too eg label, windows form title and so on). 
Private Sub BackgroundWorker1_ProgressChanged(sender As Object, e As ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged 
    TextBox1.Text = e.ProgressPercentage & "%" 
    ProgressBar1.Value = e.ProgressPercentage 
End Sub 

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    ''This is make the backgroundworker start at load up(change it to a button if need be 
    CheckForIllegalCrossThreadCalls = False 
    BackgroundWorker1.RunWorkerAsync() 
End Sub 

Private Sub BackgroundWorker1_DoWork(sender As Object, e As DoWorkEventArgs) Handles BackgroundWorker1.DoWork 
    ''This is the example that i created to show you how to set a task. 
    For i = 0 To 10000 
     TextBox1.Text = i 
     BackgroundWorker1.ReportProgress(i) 
     System.Threading.Thread.Sleep(500) 
    Next 
    End Sub 

Private Sub BackgroundWorker1_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted 
    ''once the task is complete it will show a messagebox and reset the progressbars value to 0 so its not full when the task is compelete. 
    MessageBox.Show("Completed") 
    ProgressBar1.Value = 0 
End Sub 

End класса

Дайте мне знать, как вы идете, я живу в стране, где я не могу получить ссылку на веб-сайт, опубликованный вами.
Счастливый Coding

UPDATE: не проверить backgroundworkers на гугле, есть много учебников, чтобы помочь вам :)

Смежные вопросы