Serial VB 2005 pic 16f877a problems

[Snap]

here is the missing class

Public Class temp

    Private m_binary As String
    Private m_celsius As String
    Private m_farenheight As String

    Public Property binary()
        Get
            Return m_binary
        End Get
        Set(ByVal value)
            m_binary = value
        End Set
    End Property

    Public Property celsius()
        Get
            Return m_celsius
        End Get
        Set(ByVal value)
            m_celsius = value
        End Set


    End Property
    Public Property farenheight()
        Get
            Return m_farenheight
        End Get
        Set(ByVal value)
            m_farenheight = value

        End Set
    End Property


End Class

I added the extra methods for future things
create a main form with a cercius and farenheit text box and a button to get it started
good luck