″ByValIpComNameAsStri
gByValwI
QueueAsI
tegerByValwOutQueueAsI
tegerAsI
tegerDeclareFu
ctio
SetCommStateLib″User″IpDCBAsDCBAsI
tegerDeclareFu
ctio
ReadCommLib″User″ByVal
CidAsI
tegerByValIpBufAsStri
gByVal
SizeAsI
tegerAsI
tegerDeclareFu
ctio
WriteCommLib″User″ByVal
CidAsI
tegerByValIpBufAsStri
gByVal
SizeAsI
tegerAsI
tegerDeclareFu
ctio
ClosecommLib″User″ByVal
CidAsI
tegerAsI
tegerDeclareFu
ctio
BuildCommDCBLib″User″ByValIpDefAsStri
gIpDCBAsDCBAsI
tegerDeclareFu
ctio
GetCommErrorLib″User″ByVal
CidAsI
tegerIpStatAsCOMSTATAsI
tegerGlobalIpDCBAsDCBGlobal
CidAsI
tegerSubForm1loadDimcomsetAsStri
gcomset“COM2