VB - 重置for循环？

Question

好的，所以我正在尝试创建一个程序来编码和解码一个vigenere密码，它会根据你使用的密钥编码你的程序，如2,5,3,7。我已经有了代码，它接受用户输入的密钥，并将每个整数分成一个数组（vKey），在这里：

  Const maxKeyLen = 25
  Dim vKey(maxKeyLen) As Integer
  Dim numKeys As Integer
  Dim i As Integer
  Dim vKee() As String = txtKey.Text.Split(CChar(","))
  numKeys = vKee.Length
  For i = 0 To numKeys - 1
      vKey(i) = Int(vKee(i))
  Next

我需要以某种方式做这个循环：

  For i = 0 To Len(plaintext) - 1
     For m = 0 To vKey.Length -1 
        shift = vKey(m)
        cipher += shiftIt(plaintext(i), shift)
      Next

  Next

所以现在会发生什么是如果我输入键2,3,4循环将最终将第一个字母移动2，第二个字母移动3，第三个移动4然后它将停止。我需要它以某种方式将第四个字母移动2并继续使用密钥移动文件的其余部分。

谢谢！