public class frmFucksGiven

Private sub frmFucksgiven_load

dim fucksgiven as object
dim boring as boolean

if boring = true then
fucksgiven = "0 fucks given"
else
boring = true
end if
end sub
end class

I call this "whenever kookoo speaks-o-meter"

Oh and hi cadbury. welcome to the clan