IF – Visual Basic – Fórum – Programujte.com

Ahoj, mám takový problém, chci aby po stisknutí tlačítka se sečetli dvě hodnoty z textboxů a v případě zaškrtnutí checkboxu se ještě vynásobily dvěma mám to napsané takto:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If CheckBox1.Checked Then Label1.Text = 2 * (Val(TextBox1.Text) + Val(TextBox2.Text))
else
Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End if
End Sub

jenže mi to vyhazuje tyto dvě chyby
Error 1 'Else' must be preceded by a matching 'If' or 'ElseIf'.
Error 2 'End If' must be preceded by a matching 'If'.

poradíte někdo co dělám blbě?
děkuji

Pokud používáš složený If, nesmí být za slovem Then niv.

Správná syntaxe příkazu je

If CheckBox1.Checked Then
Label1.Text = 2 * (Val(TextBox1.Text) + Val(TextBox2.Text))
Else
Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End if

překlep -> niv=nic

To jkonopasek : aha, díky moc

ach jo

ten zápis je hrůza

správná varianta
a=Val(TextBox1.Text) + Val(TextBox2.Text)
if CheckBox1.Checked then a= 2*a

ještě mám jeden dotaz

mám menustrip a tam dvě položky, jedna na zavření programu a druhou bych chtěl vyvolat další okno(form2) a nemůžu prostě přijít na to co tam napsat

nevíte?
dík

Load Form2
Form2.Show