vb变量附值问题，求助高手

Question

dim a string*10
b=12345
a=b
text.text=a在文本框中显示“12345_____”
怎样才能显示“_____12345”

Answer 1

Option ExplicitPrivate Sub Command1_Click()
    Dim a As String * 10, b As Long
    b = 12345
    a = b
    Text1.Text = String(10 - Len(b), " ") & Trim(a)
End Sub

Answer 2

Dim a As String * 10, b As Long
    b = 12345
    a = Space(5) & CStr(b)
    Text1.Text = a

Answer 3

Dim a As String * 10, b As Long
    b = 12345
    a = Space(len(b)) & CStr(b)
    Text1.Text = a

Answer 4

Dim a As String * 10, b As Long
    b = 12345
    a = Space(len(cstr(b))) & CStr(b)
    Text1.Text = a

Answer 5

设置text1右对齐
text1.text=trim(a)