女儿12岁,父亲比她大20岁,编一个程序几年以后父亲比女儿大一倍,那时候年龄各多少

来源:百度知道 编辑:UC知道 时间:2024/06/04 06:45:57
女儿12岁,父亲比她大20岁,编一个程序几年以后父亲比女儿大一倍,那时候年龄各多少
我要求的是用VB写出来

设父亲年龄为a,女儿为b,n年后父亲年龄是女儿的两倍。
在窗体上画一个命令按钮(command1),编写程序如下:
private command1-click()
dim a as integer
dim b as integer
dim n as integer
a=inputbox("请输入父亲的年龄:")
b=inputbox("请输入女儿的年龄:")
n=a-2*b
print n;"年后父亲的年龄是女儿的两倍"
end sub
你是学vb的吗,有不懂的问题尽管来问我。祝你学习进步。(以上a输入32,b输入12)

Dim age1 as integer
dim age2 as integer
dim i as integer

age1 = 12 '女儿的年龄
age2 = age1 + 20 '父亲的年龄
i = 0

do while age2 <> age1 * 2
i = i + 1
age2 = age2 + i
age1 = age1 + i
loop

' i 是过几年以后
' age1 是那时女儿的年龄
' age2 是那时父亲的年龄

8年后女儿20岁父亲40岁

分都没还要VB

24 64