şimdi arkadaşlar textbox1 den girilen sayıyı ikili sisteme (10) çeviren programı paylaşıyorum


formumuzda 1 textbox 1 button 1 listbox koyuyoruz


Public Class Form1
    Dim i As Integer
    Dim sayi As Byte
    dim a(10) as byte

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      i = 0
      sayi = TextBox1.Text
      Do Until (sayi < 2)
        a(i) = sayi Mod 2
        sayi = sayi \ 2
        i = i + 1
      Loop
      a(i) = sayi
      Do
        ListBox1.Items.Add(a(i))
        i = i - 1
      Loop While i >= 0
    End Sub
End Class


tamamdır programımız hazır emeğe saygı:D:D

ya bide bu programin tersi calisan yani
10 luk sayi sisteminden 2 lige ceviren bi program kodu yazsaniz sevabina,cok hayra gecer..bi zahmet haci bea....

tebrik ederim...Eline sağlık bunu yeni konu olarak açablirsin