Option Explicit

Private Sub Command1_Click()
    End
End Sub

Private Sub Form_Load()
    SftButton8.Text = "Two Lines" & vbCrLf & "of Text"
End Sub