Не удалось найти Sub Main

Visual Studio пишет, что не удаётся найти Sub Main. Так как куда его вставлять, если это приложение WIndows? Ошибка BC30420 'Не удалось найти "Sub Main" в "задача1"

    Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim n, sum As Integer
    n = Val(TextBox1.Text)
    sum = 0
    Do While n = 0
        sum = sum + n
        n = n - 1
    Loop
    TextBox2.Text = Str(sum)
End Sub

End Class