[RESOLVED] Subtractinghexidecimal Numbers and keeping leading 0's (vb2005)
Well this is what I have so far:
Code:
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
Re: Subtractinghexidecimal Numbers and keeping leading 0's (vb2005)
Declare things:
Code:
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)
Re: Subtractinghexidecimal Numbers and keeping leading 0's (vb2005)
Quote:
Originally Posted by
dglienna
Declare things:
Code:
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))