Поторопился, сказав "все работает". Работает при вызове из Access. А вот, что происходит в VB:
1. Модуль из первого поста обозвал Plus1, сам проект - Plus. Создал из него dll.
2. Создаю новый проект (опять ActiveX DLL), добавляю ссылку на Plus.dll, создаю процедуру:
1.
2.
3.
Public Function aaaa() As Integer
Dim ee As New plus1
aaaa = ee.qq( 2 , 3 )
End Function
, на последней строке добавляю точку останова, запускаю...ни фига не происходит, тогда намеренно искажаю код:
1.
2.
3.
Public Function aaaa() As Integer
Dim ee As New plus1
aaaa = ee.qq
End Function
Access в этом месте ругался на неправильное число аргументов у функции qq, но VB и это проглатывает. Где грабли?
