vb電腦編程 編寫壹個程序，根據本金a、存款年數n和年利率p計算到期利息。提示：到期利息計

'代碼如下：

private?sub?form_load()

label1.caption?="本金"

label2.caption="存款年數"

label3.caption="年利率"

label4.caption="到期利息"

endsub

private?sub?command1_click()

dim?a?as?single

dim?n?as?integer

dim?p?as?single

dim?Lx?as?single

a=val(text1.text)

n=val(text2.text)

p=val(text3.text)

Lx=a*(1+p)^n-a

text4.text=Lx

end?sub

有什麽疑問請留言。?