From: gbashore@bcpl.net   
      
   Roy try this with a textbox multiline = True and a command button.   
      
   Option Explicit   
      
   Private Sub Command1_Click()   
   Dim myStr As String   
   Dim myStrLen As Long   
   Dim myLoop As Long   
   Dim myEndStr As String   
   myStr = Text1.Text   
   myStrLen = Len(myStr)   
   For myLoop = 1 To myStrLen   
   myEndStr = myEndStr & (Mid$(myStr, myLoop, 1) & vbNewLine)   
   Next myLoop   
   Text1.Text = myEndStr   
   Command1.Visible = False   
   End Sub   
      
   Private Sub Form_Load()   
   Text1.Text = "HELLO WORLD"   
   End Sub   
      
   George   
      
      
      
   "Roy Harbert"  wrote in message   
   news:4B%rf.766$Rb.621@trndny02...   
   > Is there a text box that can rotate or a way to print text rotated 90   
   > degrees? I've been looking but can't find anything.   
   >   
   >   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)