题目

编写VB程序,实现如下功能:在文本框Text1中输入投资金额,Text2中输入投资的目标金额,Text3中输入投资的年收益率,单击按钮Command1,在文本框Text4中输出达成预期投资目标至少需要的年数。投资收益按复利计算,如投资金额10000元,年收益率为5%,则1年后的本息为10000×(1+5%),2年后的本息为10000×(1+5%)2。程序运行界面如图所示。 (1) 代码“Private Sub Command1_Click()”中的Command1_Click()是(填字母:A .对象名/B .事件名/C .事件处理过程名/D .方法名) (2) 为实现上述功能,请在划线处填入合适的代码。 Private Sub Command1_Click()   Dim pv As Single, fv As Single, rate As Single, n As Integer pv = Val(Text1.Text) fv = Val(Text2.Text)   n = 1   Do While pv<fv pv = pv * (1 + rate)     List1.AddItem "第" + Str(n) + "年" + "  " + Str(pv) + "元"       Loop End Sub 答案: 【1】C 【1】rate=val(text3.text)或rate=text3.text【2】n=n+1【3】text4.text=str(n-1)
信息技术 试题推荐
最近更新