Yoctopuce Yocto-VOC-V3 Mode D'emploi page 135

Table des Matières

Publicité

voc
= YVoc.FindVoc("MaFonction")
renvoie un objet que vous pouvez ensuite utiliser à loisir pour contrôler le capteur
YVoc.FindVoc
de Composés Organiques Volatils.
isOnline
La méthode
isOnline()
correspondant est présent et en état de marche.
get_currentValue
La méthode
get_currentValue()
Composé Organique Volatil mesuré par le capteur. La valeur de retour est un nombre flottant
representant directement le taux de VOC en parties par million équivalent CO2.
Un exemple réel
Lancez Microsoft VisualBasic et ouvrez le projet exemple correspondant, fourni dans le répertoire
Examples/Doc-GettingStarted-Yocto-VOC-V3 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
As
Dim
vocsensor
If
argv.Length
target
= argv(1)
REM
Setup the API
If
(YAPI.RegisterHub("usb",
Console.WriteLine("RegisterHub error: "
End
End If
If
target
=
"any"
vocsensor
= YVoc.FirstVoc()
If
vocsensor
Console.WriteLine("No module connected (check USB cable)
End
End If
Console.WriteLine("using "
Else
vocsensor
=
End If
While (True)
If Not (vocsensor.isOnline()) Then
Console.WriteLine("Module not connected (check identification and USB
End
End If
Console.WriteLine("VOC: "
Console.WriteLine("
YAPI.Sleep(1000,
End While
www.yoctopuce.com
de l'objet renvoyé par
de l'objet renvoyé par
System.AppDomain.CurrentDomain.FriendlyName
+
"
<serial_number>")
+
"
<logical_name>")
+
" any
String
= System.Environment.GetCommandLineArgs()
String
=
""
String
As
YVoc
<
2
Then Usage()
to
use local USB devices
errmsg) <> YAPI_SUCCESS) Then
Then
Is Nothing Then
+ vocsensor.get_module().get_serialNumber())
YVoc.FindVoc(target
+ ".voc")
+ Str(vocsensor.get_currentValue()) +
(press Ctrl-C to
errmsg)
16. Utilisation du Yocto-VOC-V3 en VisualBasic .NET
YVoc.FindVoc
yFindVoc
")
+ errmsg)
exit)")
permet de savoir si le module
permet d'obtenir le taux de
")
cable)")
"
ppm")
129

Publicité

Table des Matières
loading

Table des Matières