Simple AcitveX DLL QUESTION (I hope)

[MatteoXMad]

In this code:

Option Explicit

' PROPERTIES':
Private m_comm As MSComm
Private m_num As Long
Private m_str As String

' METHODS:
Public Sub function1()
    m_str = "Str1"
    m_num = 1
End Sub

Public Sub function2(ByVal var As String)
    m_str = "Str2"
    m_num = 2
    m_comm.CommPort = 1                   <-------!!!! ERROR!!!!!
End Sub

Error: "Object variable or With block variable not set (Error 91)"


Why I can't assign the value ?????

Thanks