is very easy.
you should use the library rapiDektop.dll and OpenNetCF
rapi.New1
ErrorLabel(errConexion)
rapi.Connect
Do Until rapi.IsConnected = true
DoEvents
If (Now - t)/cTicksPerSecond > 3 Then
Msgbox("Cannot connect to device.")
AppClose
End If
Loop
Return
errConexion:
Msgbox("Error de conexion, persiste este error contacte con su distribuidor,"," Error de Conexión ")
AppClose