vs2005中进度条问题

最好用Timer控件，在timer1_Tick事件里面写，把Timer的Intreval属性设为1000就行了.

非要在button_click事件中写也行

while（progressBar1.Value<100）

{

progressBar1.Value++

Thread.Sleep(1000)

}

记住using System.Threading

Public Class Form1Private Property Caption As StringPrivate Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LoadEnd SubPrivate Sub Form_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)End SubPrivate Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Text1.TextChangedEnd SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.ClickDim n As Double1: n = MsgBox("程序已损坏，是否启用程序修复功能？", vbExclamation + vbYesNo, "程序损坏")If n = vbYes ThenText1.Text = "正在修复中^_^"Text1.Text = "修复失败"MsgBox("修复失败，请稍后再修", vbCritical+ vbOKOnly, "修复失败")ElseGoTo 1End IfEnd SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickEndEnd SubEnd Class

---