Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Vb.net Binary Converter
#1
Bu kodlar sayesinde yazılarınızı 0 ve 1'lere Vb.net kullanarak çevirebileceksiniz,kolay gelsin exciting

Kod:
Public Class Form1

    'Author : Symxq
    'Blog : <span class="skimlinks-unlinked">http://www.blogspot.com</span>

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Value As String = Nothing
        Dim Re As New <span class="skimlinks-unlinked">System.Text.StringBuilder</span>
            For Each Character As Byte In <span class="skimlinks-unlinked">System.Text.ASCIIEncoding.ASCII.GetBytes(TextBox1.Text</span>)
            Re.Append(Convert.ToString(Character, 2).PadLeft(8, "0"))
            Re.Append(" ")
            Next
        Value = Re.ToString.Substring(0, Re.ToString.Length - 0)
        TextBox2.Text = Value

    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        
            TextBox1.Text = TextBox2.Text
        Dim Values As String = Nothing
        Dim Character As String = <span class="skimlinks-unlinked">System.Text.RegularExpressions.Regex.Replace(TextBox1.Text</span>, "[^01]", "")
        Dim ByteArrays((Character.Length / 8) - 1) As Byte
        For Index As Integer = 0 To Bytearrays.Length - 1
            Bytearrays(Index) = Convert.ToByte(Character.Substring(Index * 8, 8), 2)
        Next
        Values = <span class="skimlinks-unlinked">System.Text.ASCIIEncoding.ASCII.GetString(Bytearrays</span>)
        TextBox2.Text = Values

    End Sub
End Class


Resim;

www.deccal.org
kiss
Beğenenler:

Anahtar Kelimeler

Vb.net Binary Converter indir, Vb.net Binary Converter Videosu, Vb.net Binary Converter Online izle, Vb.net Binary Converter Bedava indir, Vb.net Binary Converter Yükle, Vb.net Binary Converter Hakkında, Vb.net Binary Converter Nedir, Vb.net Binary Converter Free indir, Vb.net Binary Converter Oyunu, Vb.net Binary Converter Download


1 Ziyaretçi