InetSendShowWinCmd Example for Visual Basic

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