Private Sub OnBeforePrint(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintEventArgs)
Dim amount As String = Microsoft.VisualBasic.Format(((SUMTotalAmount.Summary.GetResult - 82)), "$0.00")
Dim renewalDate as String = RenewalDeadline.text
Dim Totalamount As String = Microsoft.VisualBasic.Format(((SUMTotalAmount.Summary.GetResult - 82))*.08625 +(SUMTotalAmount.Summary.GetResult - 82), "$0.00")
ctype(sender,xrLabel).text = "YES - Renew BEFORE " + renewalDate + " and PREPAY for the entire season:" + Environment.NewLine + "Annual Cost = " + amount + " plus sales tax = " + Totalamount
End Sub
What do I do to make the "totalamount" bold font