Use the NANOBEGIN and NANOEND functions from ArmAccess.DLL. The
declarations for them, which can be placed in any Module file, are
here (only put them in one module file):
Public Declare Sub NANOBEGIN Lib "ArmAccess.DLL" ()
Public Declare Sub NANOEND Lib "ArmAccess.DLL" ()
在vb中建立一个模块（bas）文件， 在里面写上
Public Declare Sub NANOBEGIN Lib "ArmAccess.DLL" ()
Public Declare Sub NANOEND Lib "ArmAccess.DLL" ()
在你的form1中的load中写入
private sub form1_load()
call NANOBEGIN
end sub
在你的form1的unload中写入
private sub form1_unload(unloadmode as integer) '不记得有没写错
call NONAEND
end sub
