Переменная не установлена ​​ошибка в VB6

Question

Private m_IncidentDateRange As New MCWebServiceCOMWrapper.DateRange 

Public Property Get IncidentDateRange() As MCWebServiceCOMWrapper.DateRange 
    IncidentDateRange = m_IncidentDateRange 
End Property 
Public Property Let IncidentDateRange(ByRef vNewValue As MCWebServiceCOMWrapper.DateRange) 
    Set m_IncidentDateRange = vNewValue 
End Property 

Ошибка появляется в Получ, пожалуйста, помогите

Answer 1

Я хотел бы проверить документацию для объекта MCWebServiceCOMWrapper.DateRange и посмотреть, если вы должны инициализировать его со значениями, прежде чем вы можете используй это. (возможно, установить дату начала и окончания).

Answer 2

Вам не нужно использовать «Установить» там?