Visual Basic - Funcion de Expresion logica

Hola

Estoy tratando de crear una funcion de la siguiente forma:

Function LogicaSI(a, b, c, d)

Dim op As String

Op = Me.TxTOp

IF a Op b then
LogicaSI = C
else
LOgicaSI = D

End if

End Function

Pero me remarca IF a Op b then me imagino que debe ser por "Op", es una variable donde trato de decirle yo que operador tiene que utilizar con <> <=, es posible esto? , gracias de antemano.

No es posible, los operadores no pueden ser variables

Debería ser algo así

Select Case Op
Case "<>" LogicaSI = A
Case "=" LogicaSI = B
..........
End Select

Saludos desde Baires, JuanC

Perfecto, gracias che!, solucionado.

Lo eh intentado hasta el canzancio pero naa, no funciona mira esto es lo que intente:

Pero nada, gracias igual y si tenes alguna sugerencia te la agradecere eternamente.

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