NETMF4.2 VB, Empezando con Cerberus

'Como empezar con "Cerberus" (Como atencion al Sr. Frederick)
'
' Descargar/Instalar el sdk 4.2QFE2 de netmf : http://netmf.codeplex.com/downloads/get/470705
' Descargar/Instalar el sdk 4.2RC2 de GHI : (puedes encontrarlo el la pagina de detalles "Cerberus".
'
' Una vez instalado...
' - Ejecutar una instancia de Visual Studio 2010
' - Nuevo Proyecto
' - Escoger Visual Basic>Gadgeteer>.Net Gadgeteer Aplication (NETMF 4.2)
' - Copiar y pegar este codigo... y listo!, el Led verde parpadeara hasta el fin de los tiempos :-)

Imports GT = Gadgeteer
Imports
GTM = Gadgeteer.Modules
Partial Public Class
Program

  Public
Sub ProgramStarted()
      timer.Start()
     
Debug.Print("Program Started"
)
  End Sub

  Dim WithEvents timer As GT.Timer = New GT.Timer(1000) ' un cop per segon (1000ms)
  Dim tic As Boolean = False

  Private
Sub timer_Tick(timer As Gadgeteer.Timer) Handles
timer.Tick
      tic =
Not
tic
      Mainboard.SetDebugLED(tic)
  End
Sub

End
Class

Published Fri, Sep 14 2012 16:54 by peplluis
Filed under:

Leave a Comment

(required) 
(required) 
(optional)
(required) 
If you can't read this number refresh your screen
Enter the numbers above: