Вызов функций из сишной dll - VB

Формулировка задачи:

Есть сишное описание функции находящейся в dll:
int ispSerialize (int memory, ULONG addr, LONG64 sn, UCHAR snBase, string format)
Как правильно ее описать для вызова в VBA? Сколько ни пробовал - при попытке выполнения проект вываливается с ошибкой приложения...
В Access описываю так:
Private Declare Function ispSerialize Lib "AtJniIsp.dll" (ByVal memory As Integer, ByVal addr As Long, ByVal SN As Currency, ByVal snbase As Byte, ByVal format As String) As Integer
dll готовая, поменять формат вызова возможности нет

Решение задачи: «Вызов функций из сишной dll»

textual
                            Листинг программы 
                        

                            <font color="blue">Private</font> <font color="blue">Declare</font> <font color="blue">Function</font> ispSerialize Lib <font color="teal">"AtJniIsp.dll"</font> ( _
   <font color="blue">ByVal</font> memory <font color="blue">As</font> <font color="blue">Long</font>, <font color="blue">ByVal</font> addr <font color="blue">As</font> <font color="blue">Long</font>, <font color="blue">ByVal</font> SN <font color="blue">As</font> Currency, _
   <font color="blue">ByVal</font> snbase <font color="blue">As</font> <font color="blue">Byte</font>, <font color="blue">ByVal</font> format_npos <font color="blue">As</font> <font color="blue">Long</font>, <font color="blue">ByVal</font> format <font color="blue">As</font> <font color="blue">String</font>, _
   <font color="blue">ByVal</font> format_len <font color="blue">As</font> <font color="blue">Long</font>, <font color="blue">ByVal</font> format_res <font color="blue">As</font> <font color="blue">Long</font>) <font color="blue">As</font> <font color="blue">Long</font>
                        