Помогите решить проблему. Я написал на С++ COM объект и при попытке вызвать его метод из VB, возникает ошибка. Выдается сообщение о том что несответсвуют типы танных.

На С++ метод объявлен так:
STDMETHOD(RunService)(BSTR ServiceName, int* ErrorCode);

Из VB вызываю так
Dim ObjServCtrl As Object
Dim Err As Integer

Set ObjServCtrl = CreateObject("Servctrl.ServController")
ObjServCtrl.RunService TextNameSrv.Text, Err

Проблема возникает со вторым параметром (Err).
Что здесь не так?

Всем спасибо за помощь.

Ответ нашел:
в VB вместо
Dim Err As Integer
написал
Dim Err As Long
Все заработало.