Pregunta de programación de VB, Xiaohong tiene 13 años este año y su padre tiene 37 años. ¿Cuántos años tendrá el padre el doble de la edad de su hija?

sub?xxx()

dim?h?as?integer,b?as?integer?,i?as?integer

h=13

b=37

i=0

mientras?h*2<>b

i=i+1

h=h+1

b=b+1

wend

msgbox?i?&?"Años después, la edad de papá (" & ?b?&") es el doble de largo que Xiaohong ("?&?h?&?")."

end?sub