im confused already a day and i dont understand why this error happends

r.fg.Text = "Warning "..p.WarningCount.Value..". Reason: "..a
p.WarningCount.Value = p.WarningCount.Value + 1