Private Sub Command1_Click() Text1.Text = StrReverse(Text1.Text) Text1.ForeColor = vbRed Text1.FontBold = True Text1.FontSize = 20End Sub
