SGD VBDN03C Fachinformatiker und ich hänge

    Hallo zusammen,

    ich hänge hier bei folgender Frage:
    Am Code ist nicht alles richtig. untersterichen sie syntaxfeher dort wo sie erstmals auftreten un benennen sie sie.

    Dim a as integer
    a=textbox1
    if a > 50 then
    backcolor =color.red
    else
    backcolor=color.green
    end if
    do
    a=a+10
    until a>100
    loop
    else
    a=a+10
    loop while a<=100
    end if

    soweit bin ich, weiss aber nicht ons richtig ist:
    Dim a As Integer
    a = 1
    If a >= 50 Then
    TextBox1.BackColor = Color.Red
    Else
    TextBox1.BackColor = Color.Green
    End If

    wie ghets nun weiter?

    Danke