Programa Visual Studio

[carleto]

Exercicio: "Fazer um programa que leia o peso de 5 pessoas e a capacidade maxima suportada por um elevador. O programa deve mostrar em uma msg (label) se o elevador pode subir ou se excedeu o peso, deverá mostrar quantos quilos excedeu."

Public Class Form1

    Private Sub Daniel_Click(sender As Object, e As EventArgs) Handles Daniel.Click
        Dim Capacidadetxt As Double
        Dim Pessoa1 As Double
        Dim Pessoa2 As Double
        Dim Pessoa3 As Double
        Dim Pessoa4 As Double
        Dim Pessoa5 As Double
        Dim Resultadotxt As Double


        Capacidadetxt = Label6.Text
        Pessoa1 = Label1.Text
        Pessoa2 = Label2.Text
        Pessoa3 = Label3.Text
        Pessoa4 = Label4.Text
        Pessoa5 = Label5.Text
        Resultadotxt = Label7.Text

        If Pessoa1 + Pessoa2 + Pessoa3 + Pessoa4 + Pessoa5 > Capacidadetxt Then
            Label7.Text = "ERRO"
        ElseIf Pessoa1 + Pessoa2 + Pessoa3 + Pessoa4 + Pessoa5 < Capacidadetxt Then
            Label7.Text = "VAI"

        End If

    End Sub

End Class

_________________

Ja tentei procurar os erros varias vazes, mas não consigo fazer com que o programa funcione...