Figured it out. Wish I had a year ago...
BEFORE PRINT EVENT
' determine if this Sales Order is new or recently changed
dim SOTxnDate as date = cdate(TxnDate.text)
if Microsoft.VisualBasic.DATEDIFF("d", SOTxnDate, DateTime.Now) <= 2 and _
Microsoft.VisualBasic.Weekday(Datetime.Now) >= 5 then
' only use bold, red and upper Thursday and Friday.
Customer.Text = Customer.Text.ToUpper
Customer.Font = New Font(Customer.Font, FontStyle.Bold)
Customer.ForeColor = Color.Red
end if
AFTER PRINT EVENT
' set it back to normal font
Customer.Font = New Font(Customer.Font, FontStyle.Regular)
Customer.ForeColor = Color.Black