Устанавливаем ссылку на DLL:

Кнопку на форму и код к ней:

Private Sub Command1_Click()
Dim a As MYMFC
Set a = New MYMFC
a.Test
Set a = Nothing
End Sub

Запускаем и смотрим:

Все работает.