Cita de: 3D1 en 11 Mayo 2009, 12:38 PM
If - And
Otra funcion If esto sirve cuando queremos verificar dos o mas valores al mismo tiempo.., por ejemplo un Login..
Code:Código (vb) [Seleccionar]If Objeto/Variable [Operador] Valor And Objeto/Variable = Valor then
' Code si los valores son verdaderos
End if
Como ejemplo:Código (vb) [Seleccionar]If Text1.Text = "Admin" And Text2.Text = "1234" then
MsgBox "Eres el Admin."
end if
Aqui decimos que si Text1 dice Admin y el Text2 dice "1234" entonces muestre el mensaje..
tambien podemos añadir mas And si queremos comprobar muchos mas valores..
If - Or
Una funcion mas IF, sirve para hacer dos o mas comparaciones con valor verdadero.., mejor lo explico con un ejemplo..
Code:Código (vb) [Seleccionar]If Objeto/Var [Operador] "Valor1" or Objeto/Var = "Valor2" then
' Code si es Valor1 o es Valor2
End if
Con un ejemplo:Código [Seleccionar]If Text1.text = "Admin" or Text1.text = "User" then
Msgbox "Bienvenido " & Text1.text
end if
Aqui compara el code si text1.text dice "Admin" si no dice "Admin" entonces compara el segundo valor.., si text1.text es "User" entonces muestra el mensaje..
Cabe destacar un pekeño error de exprecion en el caso del And y el Or se esta haciendo uso de algo que creiamos cuando estabamos en la secundaria que nunca lo ibamos a usar la tabla de verdad si esa misma osea V And V = V ; V And F = F ; V Or V = V ; V or F = V osea el la exprecion que este con el And deben cumplirse las dos condiciones y la que estan con Or solo se debe cumplir una de las dos para que sea verdadera...
Saludos....