可以调用一个WebService，或者直接请求一个服务端URL，这个页面Response.Write(DateTime.Now.ToString())

用HttpWebRequest 或 WebBrowser 组件访问url,自己解析返回内容就可以取到了。

例: 显示如何获取一个 Web 页并将其内容输出：
　　
　　Dim url As New Uri("http://www.yahoo.com")　‘定义一个URI
　　
　　Dim Req As WebRequest
　　
　　Req = WebRequest.Create(url)
　　
　　Dim Resp As WebResponse
　　
　　Try
　　
　　Resp = Req.GetResponse ‘获得一个响应
　　
　　Catch exc As Exception
　　
　　MsgBox(exc.Message)
　　
　　End Try
　　
　　Dim netStream As StreamReader
　　
　　netStream = New StreamReader(Resp.GetResponseStream)
　　
　　Debug.WriteLine(netStream.ReadToEnd)
　　
　　当然，上面的例子只是一个简单的操作，可以返回一个流式的数据。

你可以调用webservice或者作个页面返回服务器时间，或者也可以访问数据库返回时间