vb6 MID function- to C# what does it become?

• • Reply

  12 years ago

  by kingdev

  kingdev

  , United States

  Joined 12 years ago

  Sub crypt(PASS As String, strg As String)

  a = 1

  For I = 1 To Len(strg)

  b = Asc(Mid$(PASS, a, 1)): a = a + 1: If a > Len(PASS) Then a = 1

  Mid$(strg, I, 1) = Chr$(Asc(Mid$(strg, I, 1)) Xor b)

  Next

  End Sub

  Report abuse
• • Reply

  12 years ago

  by Mistuke

  Mistaken Luke

  The Netherlands, Netherlands

  Joined 18 years ago

  Try Substring http://msdn.microsoft.com/en-us/library/system.string.substring(VS.71).aspx

  Report abuse