Nesse segundo artigo sobre o
Gambas2, vou apresentar algumas características, tais como controle de decisão, repetição e o início de interação com banco de dados.
Estruturas:
IF
Os IF no Gambas2 acompanham a seguinte sintaxe:
if objeto = valor then { se objeto = valor então }
{ faça isso }
else { senão }
{ faça isso }
end if { fim da estrutura}
Um exemplo mais prático é testando apenas se os valores de textbox1.text e textbox2.txt são iguais, mostrando uma mensagem. Foram usadas duas textbox e um ToggleButton:
PUBLIC SUB ToggleButton1_Click()
IF TextBox1.Text = TextBox2.Text THEN
Message.Info("Os valores são iguais !")
ELSE
Message.Info("Os valores são diferentes !")
ENDIF
Já no caso abaixo é testado o valor (numérico) das textbox:
PUBLIC SUB ToggleButton1_Click()
IF Val(TextBox1.Text) = Val(TextBox2.Text) THEN
Message.Info("Os valores são iguais !")
ENDIF
IF Val(TextBox1.Text) > Val(TextBox2.Text) THEN
Message.Info("O primeiro valor é maior são iguais !")
ENDIF
IF Val(TextBox1.Text) < Val(TextBox2.Text) THEN
Message.Info("O segundo valor é maior são iguais !")
ENDIF
END