[RESOLVED] Label not working

Hi everyone!

I'm just wondering how come the Label (lblStatus) within my UserForm1, which shows the status of my program, isn't working. Is my computer too fast or do I need to add some code to be able to show the status of my program? Many thanks!

e.g.

Code:

---

UserForm1.lblStatus.Caption = "Checking Actual Date Finished..."
    CheckActFinish  'Subroutine
    UserForm1.ProgressBar1.Value = 100 / (vali - 2)
   
    UserForm1.lblStatus.Caption = "Checking Negative Fix Time..."
    CheckNegativeFixTime  'Subroutine
    UserForm1.ProgressBar1.Value = 100 / (vali - 3)
   
    UserForm1.lblStatus.Caption = "Checking Negative RF.."
    CheckNegativeRF  'Subroutine
    UserForm1.ProgressBar1.Value = 100 / (vali - 4)

---

Cheers,
Radic

I am not too Sure but you can try this

UserForm1.lblStatus.Caption = "Checking Actual Date Finished..."
DoEvents
CheckActFinish 'Subroutine
UserForm1.ProgressBar1.Value = 100 / (vali - 2)

UserForm1.lblStatus.Caption = "Checking Negative Fix Time..."
DoEvents
CheckNegativeFixTime 'Subroutine
UserForm1.ProgressBar1.Value = 100 / (vali - 3)

UserForm1.lblStatus.Caption = "Checking Negative RF.."
DoEvents
CheckNegativeRF 'Subroutine
UserForm1.ProgressBar1.Value = 100 / (vali - 4)

Hey, it worked so well!!! Thanks so much!!! Cheers!!!