Socketexception未得到处理 - vb.net

Question

我试图从互联网上为我的工具腾出时间。

我从stackoverflow得到了这个（它在c＃中，将其转换为vb）。

 Dim client = new tcpclient("time.nist.gov", 13)
 Using streamreader = new streamreader(client.getstream())
    dim response = streamreader.readtoend()
    dim utcdatetimestring = response.substring(7, 17)
    dim localdatetime = datetime.parseexact(utcdatetimestring, "yy-MM-dd HH:mm:ss", cultureinfo.invariantculture, datetimestyles.assumeuniversal)
 End using

我得到“连接尝试失败，因为连接方在一段时间后没有正确响应......”错误。