vb程序设计实例

显示全部楼层 · 2009-5-22 17:06:20

Private Sub Form_Activate()'1年期2.25%，2年期2.43%，3年期为2.70%，5年期为2.88%（不记复利）。今有X元，5年以后使用，共有如下6中存法：Const x1 As Double = 0.0225, x2 As Double = 0.0243, x3 As Double = 0.027, x5 As Double = 0.0288Dim x As Doublex = Val(InputBox(""))Print "①存一次5年期,5年后到期的本息合计"; ss(x, 5, x5)Print "②存一次3年期，一次2年期,5年后到期的本息合计"; ss(ss(x, 3, x3), 2, ...

千问 · 2009-5-22 17:06:20

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button30.Click Dim a As Double, b As Double, c As Double, d As Double, n As Double Dim ...

千问 · 2009-5-22 17:06:20

你要什么系统？...

千问 · 2009-5-22 17:06:20

你用计算器算一下不就行了么？VB算也是调用的系统计算器。x*(1+2.88%）x*(1+2.70%*2.25%*3.25%)...