Yoctopuce Yocto-MaxiMicroVolt-Rx Mode D'emploi page 139

genericsensor = YGenericSensor.FindGenericSensor("MaFonction")
YGenericSensor.FindGenericSensor
loisir pour contrôler le capteur générique.
isOnline
La méthode
isOnline()
permet de savoir si le module correspondant est présent et en état de marche.
get_currentValue
La méthode
get_currentValue()
d'obtenir la valeur actuelle mesurée par le Yocto-MaxiMicroVolt-Rx. La valeur de retour est un
nombre flottant, correspondant généralement à la mesure différentielle de tension mesurée en mV,
sauf si le
genericSensor
autre grandeur physique.
Un exemple réel
Lancez Microsoft VisualBasic et ouvrez le projet exemple correspondant, fourni dans le répertoire
Examples/Doc-GettingStarted-Yocto-MaxiMicroVolt-Rx de la librairie Yoctopuce.
Vous reconnaîtrez dans cet exemple l'utilisation des fonctions expliquées ci-dessus, cette fois
utilisées avec le décorum nécessaire à en faire un petit programme d'exemple concret.
Module Module1
Private Sub Usage()
Dim execname =
Console.WriteLine("Usage:")
Console.WriteLine(execname
Console.WriteLine(execname
Console.WriteLine(execname
System.Threading.Thread.Sleep(2500)
End
End Sub
Sub Main()
Dim argv() As
Dim errmsg As
Dim target, serial
Dim sensor, ch1, ch2
If argv.Length
target = argv(1)
REM Setup the API
If (YAPI.RegisterHub("usb",
Console.WriteLine("RegisterHub error: "
End
End If
If target = "any"
sensor = YGenericSensor.FirstGenericSensor()
If sensor Is Nothing Then
Console.WriteLine("No module connected (check USB cable)
End
End If
Console.WriteLine("using:"
Else
sensor = YGenericSensor.FindGenericSensor(target
End If
REM retreive module
serial = sensor.get_module().get_serialNumber()
REM retreive both channels
ch1 = YGenericSensor.FindGenericSensor(serial
ch2 = YGenericSensor.FindGenericSensor(serial
While (ch1.isOnline() And ch2.isOnline())
www.yoctopuce.com
de l'objet renvoyé par
de l'objet renvoyé par
a été configuré pour effectuer une correspondance linéaire vers une
System.AppDomain.CurrentDomain.FriendlyName
+ " <serial_number>")
+ " <logical_name>")
+ " any
String = System.Environment.GetCommandLineArgs()
String = ""
As String
As YGenericSensor
< 2 Then Usage()
to use local USB devices
errmsg) <> YAPI_SUCCESS) Then
Then
+ sensor.get_module().get_serialNumber())
serial number
16. Utilisation du Yocto-MaxiMicroVolt-Rx en VisualBasic .NET
renvoie un objet que vous pouvez ensuite utiliser à
YGenericSensor.FindGenericSensor
yFindGenericSensor
")
+ errmsg)
+ ".genericSensor1")
+ ".genericSensor1")
+ ".genericSensor2")
")
permet
133