ESPECIFICAR OPERADOR EN FUNCION
Publicado por ivan (1 intervención) el 14/01/2007 05:09:09
HOLA, LO QUE INTENTO ES CREAR UNA FUNCION QUE EVALUE EXPRESIONES LOGICAS PERO QUE ME PERMITA PASARLE YO EL OPERADOR TAL Y COMO LO INTENTO DEBAJO PERO OBVIAMENTE NO ME PERMITE HACER, EXISTE ALGUNA FORMA DE HACERLO?, GRACIAS DE ANTEMANO POR TODA SU AYUDA.
Private Sub Comando4_Click()
Me.Texto0 = LogicaNo(10, >, 9, 1, 2)
End Sub
Function LogicaSI(a, Op, b, c, d)
Dim Op As String
Select Case Op
Case ">"
If a > b Then
LogicaSI = c
Else
LogicaSI = d
End Function
Private Sub Comando4_Click()
Me.Texto0 = LogicaNo(10, >, 9, 1, 2)
End Sub
Function LogicaSI(a, Op, b, c, d)
Dim Op As String
Select Case Op
Case ">"
If a > b Then
LogicaSI = c
Else
LogicaSI = d
End Function
Valora esta pregunta


0