saludos amigos tengo que hacer una aplicacion la cual convierta codigos decimales en hexadecimales pero este no es el problema sino el siguiente los codigos hexadecimales que quiero son los que utilizan los telefonos celualares por ejemplo si tengo un decimal de un telefono que es 05500022268 el hexadecimal seria el siguiente 370056fc que es la sumatoria del resultado 055 (37)+ 00022268(0056fc) hasta aqui vamos bien lo he hecho y funciona lo que pasa es que el resultado que emite es el siguiente 3756fc ya que no coloca los ceros del segundo resultado como puedo hacer para que no los elimine hay alguna manera de formatear el codigo ojo...... si en el segundo decimal se reemplazan los ceros por numeros que normalmente ahi telefonos asi da perfecto el problema es con los ceros.... gracias y por favor agradesco ayuda o al menos una sugerencia'por cierto el primer campo tiene que tener obligatoriamente 3 digitos y el segundo 8 y el resultado hexadecimal tiene que tener obligatoriamente 8 digitos entre numeros y letras claro despues de la suma del campo 1 y el 2 y por supuesto despues de que no elimine los ceros chao
aqui esta el codigo que funciona perfecto hasta que colocas dos ceros al comienzo del campo 2
Private Sub Command1_Click()
'Form1.Text1.Text = '1er valor de solo tres digitos
'Form1.Text2.Text = '2do valor de ocho digitos
Form1.Text3.Text = Hex(Form1.Text1.Text) + Hex(Form1.Text2.Text)
Exit Sub
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
el codigo esta hecha a vuelo de pajaro pero funciona bien
