Yamabiko Block

HERRAMIENTA DE BLOQUE YAMABIKO

Herramienta para ayudar al equipo de Nishiyama del grupo Emar a calcular el bloque de Yamabiko del socio Bunka Shutter.

MASCARILLA

DEMOSTRACIÓN DEL CÓDIGO

 ''' <summary>
''' Check internet connection.
''' </summary>
''' <returns>Connection state.</returns>
Private Function IsNetAvail()
    Dim objResp As WebResponse
    Try
        objResp = WebRequest.Create( New Uri(My.Resources.link_base)).GetResponse
        objResp.Close()
        objResp = Nothing
        Return True
    Catch ex As Exception
        Return False
    End Try
End Function