Just copy/paste this into a new class.

Then, whenever you want to use it's abilities, instance a new one and call the functions:

Code:
Dim crypto As New clsCrypto
MyCypherText = crypto.EncryptString128Bit(MyPlainText, MyKey)
If this is looking strange to you, then you really should get a beginner's book to VB.NET programming.