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

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *