编写VB程序,实现如下功能:在文本框Te1中输入投资金额,Te2中输入投资的目标金额,Te3中输入投资的年收益率,单击按钮Com,在文本框Te4中输出达成预期投资目标至少需要的年数。投资收益按复利计算,如投资金额10000元,年收益率为5%,则1年后的本息为10000×(1+5%),2年后的本息为10000×(1+5%)2。程序运行界面如图所示。
(1)
代码“Private Sub Com_Click()”中的Com_Click()是________(填字母)
A . 对象名
B . 事件名
C . 事件处理过程名
D . 方法名
(2)
为实现上述功能,请在划线处填入合适的代码。Private Sub Com_Click() Dim pv As Single, fv As Single, rate As Single, n As Integerpv = Val(Te1.Text)fv = Val(Te2.Text)rate = Val(Te3.Text) / 100 n = 1 Do While pv = pv * (1 + rate) List1.AddItem "第" + Str(n) + "年" + " " + Str(pv) + "元" n = n + 1 LoopTe4.Text = End Sub
答案: C
【1】pv<fv【2】Str(n-1)