Visual Basic Binarni Konverter

[Onlykl]

E pa ovako ne znam sta da pisem u uvodu tako da cu odmah da krenem sa koracima a ako nesto ne razumete recite i prepravicu i pomocicu vam da razumete...
1. Korak:
Dupli klik na Ikonicu Mikrosoft Vizual Bejzika
2. Korak:
File -> New Project.. -> Klik na Windows Form Application
Dole pise Name: Tu napisite sta god hocete... Ja cu recimo Binarni Konverter
Slika:

3. Korak:
Form1.vb Properties
Povecajte Velicinu prozora na 491; 499
Text: Binarni Konverter
Maximize Box - False
Form Border Style - Fixed 3D
Slika:

4. Korak:
Dodajte:
2x Textbox -> MultiLine
2x Button
Slika:

5.Korak:
Dupli klik na prvo dugme(button)
Ispisite ovo:

Dim Val As String = Nothing
        Dim Result As New System.Text.StringBuilder
        For Each Character As Byte In System.Text.ASCIIEncoding.ASCII.GetBytes(TextBox1.Text)
            Result.Append(Convert.ToString(Character, 2).PadLeft(8, "0"))
            Result.Append(" ")
        Next
        Val = Result.ToString.Substring(0, Result.ToString.Length - 1)
        TextBox2.Text = Val

Posle toga Dupli klik na drugo dugme
Ispisite ovo:

Dim Val As String = Nothing
        Dim Characters As String = System.Text.RegularExpressions.Regex.Replace(TextBox1.Text, "[^01]", "")
        Dim ByteArray((Characters.Length / 8) - 1) As Byte
        For Index As Integer = 0 To ByteArray.Length - 1
            ByteArray(Index) = Convert.ToByte(Characters.Substring(Index * 8, 8), 2)
        Next
        Val = System.Text.ASCIIEncoding.ASCII.GetString(ByteArray)
        TextBox2.Text = Val

Sto znaci da prvo dugme pretvara tekst u binarni kod.
A drugo dugme binarni kod u tekst....

Debug-ujte i startujte program...
Kraj Tutoriala...
-Onlykl
Zadatak:
Pokusajte da saznate sta ovo znaci:

01110011 01100101 01110010 01100010 01101001 01100001 01101110 01100110 01101111 01110010 01110101 01101101 00101110 01101111 01110010 01100111

 

[Hasaudin]

Super tutorijal,samo kako si uspio da ti ta windows forma bude kao u office 2007??