Dim strtoencrypt As String = "String to encrypt... bla bla bla"
Dim password As String = "FGERHZXCG434TRWR"
Dim encrypted() As Byte = alice.encryptBytes(strtoencrypt.GetBytes("UTF8"),password)
Log(bc.HexFromBytes(encrypted))
'
' And decrypting ....
'
Dim decrypted() As Byte = alice.decryptBytes(encrypted,password)
Log(bc.StringFromBytes(decrypted,"UTF8"))