hola gente, tengo el siguiente problema:
en el programa que estoy realizando necesito que al clickear un text box me abra un determinado form segun los datos en otros textbox. todo funciona bien si no realizo una convercion necesaria, osea si cargo directamente +3 me abre el form correspondiente, pero si realizo la convercion y me da +3 me abre sin convercion el form equivocado. dejo el codigo para que lo vean.

ACA TENGO LA CONVERCION...

Dim dato1 As Double
Dim dato2 As Double
Dim dato3 As Long

Private Sub Command1_Click()

dato1 = Val(txtodel.Text)
dato2 = Val(txtodcl.Text)
dato3 = Val(txtodgl.Text)

If txtodcl.Text < 0 Then
txtodel.Text = dato1 + dato2
txtodcl.Text = dato2 * -1
If dato3 > 90 Then
txtodgl.Text = dato3 - 90
Else
txtodgl.Text = dato3 + 90
End If
End If

end sub

Y AL CLICKEAR ESTO NO ME ABRE EL FORM CORRESPONDIENTE...

Private Sub txtcristalodl_Click()
If (Val(txtodel.Text) <= 4 And Val(txtodel.Text) >= -4) And (Val(txtodcl.Text) <= 2 And Val(txtodcl.Text) >= -2) Then
FrmCristalesStock.Show
Else
FrmCristalesLaboratorio.Show
End If
End Sub

ESPERO RESPUESTA, SALU2