programa conversion de bases

Hola, el método .ToString() de la clase Convert tiene un parámetro que te permite especificar la base del valor de retorno, puede ser base 2 (binario), 8 (octal), 10 (decimal), 16 (hexadecimal). Elcódigo te quedaría bien fácil sin necesidad de hacer las operaciones por tu cuenta, te dejo un ejemplo suponiendo que n = 20:

     //Decimal a binario:
     textBox1.Text = Convert.ToString(n, 2);     //salida: 10100

     //Decimal a octal:
     textBox1.Text = Convert.ToString(n, 8);
     //salida: 24

     //Decimal a hexadecimal:
     textBox1.Text = Convert.ToString(n, 16);     //salida: 14

Puedes hacer las otras combinaciones, en total serian 9 pero te dejo como ejemplo de binario a hexadecimal:

     int n = 10100; // 20 decimal
     n = Convert.ToInt32(n.ToString(), 2);     textBox1.Text = Convert.ToString(n, 16);
     //salida: 14

Primero convierto de binario a decimal (entero) y de decimal a hexadecimal, fijate que convierto primero a string el primerparametro de ToInt32() por que así lo pide el método sobrecargado.
La interfaz gráfica la puedes hacer con dos ComboBox similar a los traductores de idiomas, en cada uno pones binario, octal, decimal yhexadecimal para seleccionar la conversión.
Fuente(s):
http://msdn.microsoft.com/en-us/library/…

convertidor
prívate sub comand1_click()
dim numero, res, largosuma, i, x, suma as integer
dimbinario, largo as string
end sub

Nuevo
Private sub comand2_click()
Text1= “”
Option1.caption= “”
Option2.caption= “”
Option3.caption= “”
Option4.caption= “”
Text1.setfocus
End sub

BinariosPrivate sub option1_click()
Option1.caption= “”
Numero=val(text1.text)
Do
Res= num mod 2
Option1.caption= option1.caption + “” + str(res)
Numero= int (numero/2)
Loop until numero =1Intremainder =intnumber mod 16
Strremainder = cstr(intremainder(intnumber=intnumber \ 16
Select case strremainder
Case”10”:strremainder = “A”
Case”11”:strremainder = “B”
Case”12”:strremainder...