where to create a procedure and where to call it?

Public Class CurrentTime

Public Sub GetCurrentTime(ByRef CurrentTime As String, Optional ByVal IncludeSeconds As Boolean = True)

If IncludeSeconds = False Then

CurrentTime = Format(Now, "hh:mm")

Else

CurrentTime = Format(Now, "hh:mm:ss")

End If

End Sub

End Class

lbTodayDate.Text = "hI"

but still nothing happens.  So where do i put code when i want a label.text to equals something?

am i putting my call and my procedure in the right places?

Please help.

Thanks in advance,

-Charles