Index: ActiviteitenOpvolging/ActiviteitenOpvolging/ActiviteitenOpvolgingForm.vb
===================================================================
diff -u -r1718 -r1719
--- ActiviteitenOpvolging/ActiviteitenOpvolging/ActiviteitenOpvolgingForm.vb	(.../ActiviteitenOpvolgingForm.vb)	(revision 1718)
+++ ActiviteitenOpvolging/ActiviteitenOpvolging/ActiviteitenOpvolgingForm.vb	(.../ActiviteitenOpvolgingForm.vb)	(revision 1719)
@@ -84,7 +84,9 @@
     End Sub
 
     Private Sub RefreshButton_Click(sender As Object, e As EventArgs) Handles RefreshButton.Click
+        RefreshButton.Enabled = False
         RefreshUserGridsData()
+        RefreshButton.Enabled = True
     End Sub
 
     ''' <summary>
@@ -95,7 +97,7 @@
         Dim allSuccesfulRefresh = _datagridViewUserControls.All(Function(userControl) userControl.RefreshData())
         If allSuccesfulRefresh Then
             'Update latest refresh time label with current time.
-            RefreshTimeLabel.Text = TimeOfDay.ToString() 'todo right formatting
+            RefreshTimeLabel.Text = TimeOfDay.ToString("HH:mm")
             RefreshFailedLabel.Visible = False
         Else
             RefreshFailedLabel.Visible = True