Create Vertical Strings
Version Compatibility: Visual Basic 6
Also known as StringRev, this handy module is a perfect tool when you need to make Vertical Strings! There are 4 Methods in StringRev: 1. VString(text as string): Returns a 'verticalised' string 2. HString(text as string): Returns a 'horizontalised' str 3. BkwdVString(text as string): A Backward VString 4. BkwdHString(text as string): A Backward HString StringRev works such that if you use, say, string = VString("Meosoft") and it returns the string vertical and then you do string = VString(string), it doesn't reverticalise your string. Without this filter, the string would keep on doubling in size. the HString also filters out any 'new lines' so you can horizontalise a vertical string correctly. If you don't understand, play around with the code! The two backward methods allow the creation of a backward Vertical or Horizontal String. eg. BkwdHString("Meosoft") would return "tfosoeM". Same with the vertical string. Enjoy!
Instructions: Copy the declarations and code below and paste directly into your VB project.