The little twist I added is just to use an event to send the result to be displayed by Debug.print. Also, instead of showing the read directly every second, the code calculate the average for a minute. Just hoping it may give ideas to some of you, I would never have done as much without this community....
Imports Microsoft.SPOT Imports SecretLabs.NETMF.Hardware Imports SecretLabs.NETMF.Hardware.NetduinoPlus Module Module_Un Dim tempSensor As AnalogInput = New AnalogInput(Pins.GPIO_PIN_A0) Event DisplayTemp(ByVal tmp As Double) Sub Main() AddHandler DisplayTemp, AddressOf DisplayResults While True GetAverageTemperature() End While End Sub Sub DisplayResults(tmp As Double) Dim temp As ULong = CULng(tmp) Debug.Print("Centigrades: " & tmp & " Farhenheit: " & (tmp * 9 / 5) + 32) End Sub Function GetTemperature() As Double Dim read As Integer = tempSensor.Read() Dim voltage As Double = read * 3.3 / 1024 Return (voltage - 0.5) * 100 End Function Sub GetAverageTemperature() Dim totalTemp As Double Dim averagetemp As Double For i = 0 To 59 Step 1 totalTemp += GetTemperature() Thread.Sleep(1000) Next averagetemp = totalTemp / 60 RaiseEvent DisplayTemp(averagetemp) End Sub End Module