AYUDA Invertir una cadena o el contenido de un textbox

[Stackado]

Bueno estoy haciendo un conversor de decimal a binario , todo salio bien a excepcion de que el resultado me lo muestra de derecha a izquierda y no de izquierda a derecha como deveria de ser el binario, mi interrogante es como podria invertir el resultado para que se me despliegue correctamente.

el codigo que estoy usando es el siguiente
-----
Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
opc = "Binario"
Dim a As Integer
'Dim b As String
a = Val(TextBox1.Text)
TextBox1.Text = String.Empty
Do While a > 0
TextBox1.Text &= a Mod 2
a = a \ 2
Loop
'b = StrReverse(TextBox1.Text)
'TextBox1.Text = b
End Sub
---------

Si activo la variable B y sus acciones, al final no me muestra nada

Saludos.