InetSendFreeBitmapCmd Example for Visual Basic

Dim nRet As Integer
nRet = LEADNet1.InetSendFreeBitmapCmd(999, 1)
If ((nRet <> 0) And (nRet <> ERROR_DATA_QUEUED)) Then
   MsgBox "ERROR " & CStr(nRet) & " calling InetSendFreeBitmapCmd."
Else
   MsgBox "InetSendFreeBitmapCmd Executed."
End If