Another possibilty:
If you make the text box very narrow and tall, then use a fixed-width font like courier, you get:
M
Y
T
E
X
T
So then you could get hold of a font creation program (say FCP from
http://www.high-logic.com ), make <ahem> a 'copy' of the Courier font, but in your copy, rotate all of the characters 90 degrees to the right, then in the stacked text box above, it would read from top to bottom (tilting your head to the right). It would mean that you have to distribute your font with the application, but that's not a problem.
If you want the text box to read from bottom to top (tilting your head to the left), you could make a font rotated to the left by 90 degrees, but you would have to populate the text box with a reversed string; I just happen to have a custom function that reverses strings, here it is:
Public Function reverse(YourString As String)
Dim MyLoop As Integer
For MyLoop = Len(YourString) To 1 Step -1
reverse = reverse & Mid(YourString, MyLoop, 1)
Next MyLoop
End Function
Let me know if you need any help on using this.
HTH
Mike
[This message has been edited by Mike Gurman (edited 03-16-2001).]
[This message has been edited by Mike Gurman (edited 03-16-2001).]