Cómo generar código fuente usando la sintaxis estándar de vb.net

El siguiente código es el que utilicé para calcular cuánto interés ganaría depositando $500 al mes en el banco durante 30 años. Esto implica cálculos de interés compuesto. El cuadro de texto en el lado derecho de la interfaz se utiliza para generar los resultados de cada cálculo.

Sub Botón privado1_Click(ByVal remitente como System.Object, ByVal y como System.EventArgs) Maneja el Botón1.

Dim nianxian As Integer 'Variable número de años

Dim dingcun As Integer 'Variable de depósito a plazo

Dim fuli_big As Long 'Gran interés compuesto

Dim fuli_small As Long 'Pequeño interés compuesto

Dim i As Integer 'Variable de bucle

Dim DATAstring As String 'Cadena de datos

nianxian = Val( Annual_TextBox.

dingcun = Val(Fixed_TextBox.Text)

DATAstring = ""

Para i = 1 Para 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)

Siguiente

'fuli_big = fuli_small

TextBox1.Text = DATAstring

Resultados_TextBox.Text = Str(fuli_big) "yuan"End Sub