I want to use form with label instead of messagebox in this code

Code:
Private Sub Form_Load()
On Error Resume Next
SaveSetting "hh", "StartupForm", "TimesRun", GetSetting("hh", "StartupForm", "TimesRun", 0) + 1
Timesrun = GetSetting("hh", "StartupForm", "TimesRun")
MsgBox "You have Used this programme " & Timesrun & " times"
End Sub