hi im just wondering why my label doesnt work inside the listview loop. only the progressbar do.
Code:Private Sub Form_Load() Dim ProgBar As MSComctlLib.ProgressBar Me.lblPerc.Caption = "0%" Me.lblSaveCaption.Caption = "Preparing Datas" Set ProgBar = Me.progBar1.Object ProgBar.BorderStyle = ccNone ProgBar.Appearance = ccFlat ProgBar.Min = 0 ProgBar.Value = 0 Set ProgBar = Nothing Me.TimerInterval = 1 End Sub Private Sub Form_Timer() Call SaveStaffAttendance End Sub Private Sub SaveStaffAttendance() Dim LV As MSComctlLib.ListView Dim NewProgBar As MSComctlLib.ProgressBar Set LV = Form_StaffTimeAttendance.ListView2.Object NewProgBar.Max = LV.ListItems.Count For i = 1 To LV.ListItems.Count Me.lblSaveCaption.Caption = "Updating Staff [" & LV.ListItems(i).Text & "] " & LV.ListItems(i).SubItems(1) NewProgBar.Value = NewProgBar.Value + 1 Me.lblPerc.Caption = Format(NewProgBar.Value / NewProgBar.Max * 100, "##0") & "%" next i Me.TimerInterval = 0 End Sub