Never mind I figured it out.

Code:

Private Sub mnuOnOff_Click()
If mnuOnOff.Caption = "Turn tool tips off" Then
lblIssues.ToolTipText = ""
lblDetails.ToolTipText = ""
lblAdd.ToolTipText = ""
optResolved.ToolTipText = ""
optUnresolved.ToolTipText = ""
mnuOnOff.Caption = "Turn tool tips on"
Else
lblIssues.ToolTipText = "Choose an Issue from the list below."
lblDetails.ToolTipText = "Issue details following the requested 1,2,3 format."
lblAdd.ToolTipText = "Add your additional comments here."
optResolved.ToolTipText = "Has the issue been resolved?"
optUnresolved.ToolTipText = "Has the issue been resolved?"
mnuOnOff.Caption = "Turn tool tips off"
End If

Thanks though