|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Miscelâneas)
|
|
 |
Título da Dica: Simplificando o código com IIF
|
 |
|
|
|
Postada em 23/12/2003 por [_Chuck_]
A estrutira IF é a seguinte...
If <Condição> Then
<caso verdadeira>
Else
<caso falsa>
End if
Se você quiser que A seja 20 se B for par e 10 se for impar ficaria +/- assim..
If B mod 2 = 0 Then ' Se for par
A = 20
Else
A = 10
End if
É claro que esse é um exemplo fictício... mais veja só como é a estrutura IIF
IIF(<condição>,<caso verdadeira>, <caso falsa>)
Veja com ficaria o exemplo anterior com o IIF
A = IIF(B mod 2 = 0,20,10)
viu só?? Simplificamos 5(cinco) linhas de código em apenas uma.... Mais você deve estar se perguntandu.. "tá... mais como eu posso usar isso realmente???". Pra responde isso veja só um procedimento de uma agenda que eu fiz...
Sub Corfirme(Status as Boolean)
If Status Then
incluir.Caption = "OK"
excluir.Caption = "Cancelar"
Alterar.Visible = False
FrmL.Enabled = False
Else
incluir.Caption = "Incluir"
excluir.Caption = "Excluir"
Alterar.Visible = True
FrmL.Enabled = True
End if
End Sub
Essa é uma das rotinas muito comuns em meus programas... Onde eu coloca duas açoes para um só botão.... Agora veja só... Se eu contei certo foram 11 linhas de código, né? Veja como ficaria com o IIF e algumas adequações a mais...
Private Sub Confirme(status As Boolean)
incluir.Caption = IIf(status, "&OK", "Incluir")
excluir.Caption = IIf(status, "&Cancelar", "Excluir")
alterar.Visible = Not (status)
frmL.Enabled = Not (status)
End Sub
Veja só... acabamos de eliminar só 7(sete) linhas de código... iradu naum???
Agora é com você... Estude o seu código e veja onde você poderá implementa o IIF e descubra como irá facilitá muito a sua vida...
Boum.. Eu achu que é só isso.... Qualquer dúvida...
E-Mail: MayconMaia@yahoo.com.br
ICQ: 289609955
Maycon Maia Vitali [_Chuck_]
|
|
|
|
|
