ulvis.paste.net

Paste Search Dynamic
Recent pastes
Module1
  1. Module Module1
  2.  
  3.     sub Main()
  4.         dim aByte() as byte = Text.Encoding.default.GetBytes("FirstString")
  5.         dim bByte() as byte = Text.Encoding.default.GetBytes("SecondString")
  6.         dim ccByte() as byte = Text.Encoding.default.GetBytes("ThirdString")
  7.         dim mergedByte(aByte.Length + bByte.Length) as byte
  8.         aByte.CopyTo(mergedByte, 0)
  9.         bByte.CopyTo(mergedByte, aByte.Length)
  10.         ccByte.CopyTo(mergedByte, aByte.Length + 1 + ccByte.Length)
  11.         Console.WriteLine(System.Text.Encoding.default.GetString(mergedByte))
  12.         Console.Read()
  13.     end sub
  14.  
  15. end Module
Parsed in 0.006 seconds