HINSTANCE Gpib32Lib = NULL;

Gpib32Lib=LoadLibrary("GPIB-32.DLL");

if (Gpib32Lib == NULL) {
  return FALSE;
}

Pibsta = (int *) GetProcAddress(Gpib32Lib,(LPCStr)"user_ibsta");
Piberr = (int *) GetProcAddress(Gpib32Lib,(LPCStr)"user_iberr");
Pibcntl = (long *) GetProcAddress(Gpib32Lib,(LPCStr)"user_ibcnt");