Question: I'm trying to shift letters to the end of the word. Like the sample output I have in the image.
[![Sample output](https://i.stack.imgur.com/BofY1.png)](https://i.stack.imgur.com/BofY1.png)
Using getchar and remove function, I was able to shift 1 letter. 

```
        mychar = GetChar(word, 1)   'Get the first character
        word = word.Remove(0, 1)  'Remove the first character
        input.Text = mychar         
        word = word & mychar
        output.Text = word

```

This is my code for shifting 1 letter.
I.E. for the word 'Star Wars', it currently shifts 1 letter, and says 'tar WarsS'

How can I make this move 3 characters to the end? Like in the sample image.

Answer: 
```
intNumChars = input.text

output.text = mid(word,4,len(word)) & left(word,3)

```

I wanted it to be easy for you to read but you can set the intNumChars variable to the value in your text box and replace the 4 with intNumChars + 1 and the 3 with intNumChars.

The mid() function can return a section of text in the middle of a string mid(string,start,finish). The len() function returns the length of a string so that the code will work on texts that are different lengths. The left function returns characters from the left() of a string.

I hope this is of some help.
Using Gordon's code did the trick. The left function visual studio tried to create a stub of the function, so I used the fully qualified function name when calling it. But this worked perfectly.

intNumChars = shiftnumber.Text
output.Text = Mid(word, intNumChars + 1, Len(word)) & Microsoft.VisualBasic.Left(word, intNumChars)