Duvida montar logica em IF dinamicamente

Question

Olá tenho em um formulário três opções onde posso montar condições logicas, mas não estou conseguindo monta-las no código de forma dinâmica pois nem sempre serão utilizadas as três condições. Segue a imagem do meu formulário.

 

---

Fernando Fernandes skype: cbdesousa

Answer 1

Poste seu code.

Answer 2

Public Sub filtro(ByVal sensor As String, ByVal canal As Integer, ByVal condicao As String, ByVal valorFiltro As Double, ByVal acao As Integer)
        Dim indexSensor As Integer
        Select Case (sensor.ToString)
            Case "A"
                indexSensor = 0
            Case "B"
                indexSensor = 1
            Case "C"
                indexSensor = 2
        End Select
        If condicao.ToString = ">=" AndAlso valoresSensores(indexSensor) >= valorFiltro Then
            CmdBotaoFiltro(canal, acao)
        End If


        If condicao.ToString = "<=" AndAlso valoresSensores(indexSensor) <= valorFiltro Then
            CmdBotaoFiltro(canal, acao)
        End If

        If condicao.ToString = "<" AndAlso valoresSensores(indexSensor) < valorFiltro Then
            CmdBotaoFiltro(canal, acao)
        End If

        If condicao.ToString = ">" AndAlso valoresSensores(indexSensor) > valorFiltro Then
            CmdBotaoFiltro(canal, acao)
        End If

    End Sub

 If ckA.Checked Then
            filtro(cbSensorA.Text, Convert.ToInt32(cbCanalA.Text), cbCondicaoA.Text, Convert.ToDouble(txtValorA.Text), Convert.ToInt32(cbFuncaoA.Text))
        ElseIf ckB.Checked Then
            filtro(cbSensorB.Text, Convert.ToInt32(cbCanalB.Text), cbCondicaoB.Text, Convert.ToDouble(txtValorB.Text), Convert.ToInt32(cbFuncaoB.Text))
        ElseIf ckc.Checked Then
            filtro(cbSensorC.Text, Convert.ToInt32(cbCanalC.Text), cbCondicaoC.Text, Convert.ToDouble(txtValorC.Text), Convert.ToInt32(cbFuncaoC.Text))
        End If

---

Fernando Fernandes skype: cbdesousa