[RESOLVED] Subtractinghexidecimal Numbers and keeping leading 0's (vb2005)

[Zero1UP]

Well this is what I have so far:

Dim code_address
        Dim code_offset
        Dim addition_code
        Dim convert_code
        Dim i As Integer

        code_address = Convert.ToInt32(txt_code_address.Text, 16)
        code_offset = Convert.ToInt32(txt_offset.Text, 16)
        addition_code = code_address + code_offset
        convert_code = Convert.ToString(addition_code, 16)
        txt_answer.Text = convert_code
        txt_answer.Text = (i.ToString.PadLeft(8, "0"c))
        txt_answer.Text = (i.ToString.PadRight(8, "0"c))

What im trying to make is an offset calculator and I need the leading zeros to stay, before I tried to find a fix for it it worked just fine, just no zero's.

Any case as of now all it gives me is 8 zero's

[dglienna]

Declare things:

Dim code_address  As Int32 = Convert.ToInt32(txt_code_address.Text, 16)
Dim code_offset  As Int32 = Convert.ToInt32(txt_offset.Text, 16)
Dim addition_code = code_address + code_offset
Dim convert_code = Convert.ToString(addition_code, 16)
Dim i as String = convert_code 
' modify this part below
txt_answer.Text = convert_code
txt_answer.Text = (i.ToString.PadLeft(8, "0"c))
txt_answer.Text = (i.ToString.PadRight(8, "0"c))

I didn't test things, but that should fix the i reference

EDIT: You need to use HEX() to subtract (not add like you have)

[Zero1UP]

Declare things:

Dim code_address  As Int32 = Convert.ToInt32(txt_code_address.Text, 16)
Dim code_offset  As Int32 = Convert.ToInt32(txt_offset.Text, 16)
Dim addition_code = code_address + code_offset
Dim convert_code = Convert.ToString(addition_code, 16)
Dim i as String = convert_code 
' modify this part below
txt_answer.Text = convert_code
txt_answer.Text = (i.ToString.PadLeft(8, "0"c))
txt_answer.Text = (i.ToString.PadRight(8, "0"c))

I didn't test things, but that should fix the i reference

EDIT: You need to use HEX() to subtract (not add like you have)

Yea I know, it was a mistype in the title , either way I still had the same issue for both add and sub, but I'll give this a go

EDIT:
Thanks a ton worked like a charm, the only thing that I didn't need in there was:
txt_answer.Text = (i.ToString.PadRight(8, "0"c))