Hola a todos......
tengo el suguiente problema y espero que me ayuden por favor,, ya que lo he untentado casi todo y no logro que me lea visual.
Tengo el siguiente programa en el mscomm, pero no logro que visual me lea los datos por RS232, estoy enviando desde el Pic lo siguiente
printf("SNS1= %2.1f", sensor_axila);
printf("SNS2= %2.1f", sensor_pie);..... y asi con los demas sensores, pero no logro que visual lo lea
If MSComm1.CommEvent = comEvReceive Then
ReciveString = MSComm1.Input + ReciveString
lstChar = Left(ReciveString, 1)
If lstChar = "S" Then CutString = Left(ReciveString, 10)
'=====================================================================
' SENSORES DE PACIENTE
'=====================================================================
'Sensor Axila
If Left(CutString, 4) = "SNS1" Then
Sns1Value = Val(Right(CutString, 5))
End If
TempInicial1.Text = Sns1Value
'Sensor Pies
If Left(CutString, 4) = "SNS2" Then
Sns2Value = Val(Right(CutString, 5))
End If
TempInicial2.Text = Sn21Value
'=====================================================================
' SENSORES DE MANTA
'=====================================================================
'Zona Uno
If Left(CutString, 4) = "SNS3" Then
Sns3Value = Val(Right(CutString, 5))
End If
TempInicial3.Text = Sns3Value
'Zona Dos
If Left(CutString, 4) = "SNS4" Then
Sns4Value = Val(Right(CutString, 5))
End If
TempInicial4.Text = Sns4Value
end sub
Por favor cualquier ayuda es buena......
'Zona Tres
If Left(CutString, 4) = "SNS5" Then
Sns5Value = Val(Right(CutString, 5))
End If
TempInicial5.Text = Sns5Value
