Sub str() Dim myString As String * 10 Dim myString2 As String myString = "Fred Flintstone" myString2 = "Fred Flintstone" End Sub