visual basic functions

hej eksperter

Jeg er ved at lave et program i visual basic der fortæller mig fx. hvor mange dage, år, eller måneder det kan tage at opnå et vist antal beløb.

Jeg prøver at bruge functions til opgaven, men åbenbart så vil den ikke ikke virke når jeg bruger functions.

Den kommer med denne fejlmeddelelse object referencen er ikke intillet til en forekomst af et object.
der kommer også en side frem hvor der står "no source available".
"no sysmbols are loaded for any call stack frame. the source code cannot be displayed".


Min kode ser således ud.

Public Text_text As Integer = TxtPengeIn.Text
    ' Public D_M_Å As String = ComboBox1.SelectedItem 'indsat penge om dagen eller, måneden eller om året
    Public Penge_opnåes As Integer = TxtBeløbOpnås.Text

    Public Resultat As Integer


    Public Function Dage() As Integer
        Return Val(Text_text) / Val(Penge_opnåes)


    End Function

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

        LblREsultat.Text = Resultat