Question

求vb.net的源代码，最好说明其解决问题，越多越好，满意加50分。

Answer 1

　　下面这段代码，是我用来计算每个月存500元进银行，连续30年，最后连本带利能有多少钱。这里面涉及复利计算。界面中右边的文本框用来输出每一次计算的结果。

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim nianxian As Integer '年限变量

        Dim dingcun As Integer '定存变量

        Dim fuli_big As Long '大复利

        Dim fuli_small As Long '小复利

        Dim i As Integer '循环变量

        Dim DATAstring As String '数据字符串

        nianxian = Val(年限_TextBox.Text)

        dingcun = Val(定存_TextBox.Text)

        DATAstring = ""

        For i = 1 To nianxian

            fuli_small = dingcun * (1 + 0.1875)

            dingcun = fuli_small

            fuli_big = fuli_big + fuli_small

            DATAstring = DATAstring + "[" + Trim(Str(i)) + "]" + Str(fuli_big) + Chr(13) + Chr(10)

            'DATAstring = DATAstring + "[" + Trim(Str(i)) + "]" + Str(fuli_small) + Chr(13) + Chr(10)

        Next

        'fuli_big = fuli_small

        TextBox1.Text = DATAstring

        结果_TextBox.Text = Str(fuli_big) + "元"

    End Sub

Answer 2

什么的源码都不说。

追问

什么都可以，用来自学