C#

UnicodeEncoding byteConverter = new UnicodeEncoding();
RijndaelManaged algorithm = new RijndaelManaged();
algorithm.IV = byteConverter->GetBytes(/*a unicode string converted to bytes for init vector*/);
algorithm.Key = byteConverter->GetBytes(/*a unicode string converted to bytes for password*/);
return alg; //returned as base class "SymmetricAlgorithm"

MemoryStream ms = new MemoryStream();
CryptoStream cs = new CryptoStream(ms, algorithm.CreateEncryptor(), CryptoStreamMode.Write);
for (int i = 0; i < numBytes; i++)
{
  cs.WriteByte(data[i]);
}
cs.FlushFinalBlock();
byte encoded[] = ms.ToArray();
cs.Close();
ms.Close();
string output = Convert.ToBase64String(encoded);

byte[] encoded = Convert.FromBase64String(input);
MemoryStream ms = new MemoryStream(encoded);
CryptoStream cs = new CryptoStream(ms, algorithm.CreateDecryptor(), CryptoStreamMode.Read);
byte decoded[] = new byte[encoded.Length];
for (int i = 0; i < decoded.Length; i++)
{
  int readByte = cs.ReadByte();
  if (readByte != -1)
  {
    decoded[i] = (byte)readByte;
  }
}
cs.Close();
ms.Close();

public partial class MyClass
{
    partial void MyMethod();
    partial void MyMethodB();
}

public partial class MyClass
{
    partial void MyMethod()
    {
        // Do Something
    }

    partial void MyMethodB()
    {
        // Do Something
    }

}

int x, y;
Label[] lab = new Label[3000];
for (int i = 0; i < 3000; i++)
{
   lab[i] = new Label();
   x = i / 100;
   y = i % 100;
   lab[i].Tag = string.Format("{0},{1}", x.ToString(), y.ToString());
   lab[i].AutoSize = false;
   lab[i].Top = (x - 1) * 10;
   lab[i].Left = (y - 1) * 10;
   lab[i].Height = 10;
   lab[i].Width = 10;
   this.Controls.Add(lab[i]);
}

Dim i%
Dim x$
Dim y$

For i% = 2 To 3000
   Load lblPage(t%)
   x$ = i% \ 100 + 1
   y$ = i% Mod 100
   lblPage(i%).Tag = x$ + "," + y$
   lblPage(i%).Top = (i% \ 100) * lblPage(1).Height
   lblPage(i%).Left = (i% Mod 100 - 1) * lblPage(1).Width
   lblPage(i%).Visible = True
Next i%