摘要: Public Shared Function CheckForInternetConnection() As Boolean Try Using client = New WebClient() Using stream = client.OpenRead(... 阅读全文
posted @ 2015-03-26 11:02 Youjun 阅读(122) 评论(0) 推荐(0)
摘要: 只需要一个Form,将背景色调成黑色即可,另加三个Timer。代码如下:Option Strict OnImports System.IOImports System.Drawing.Drawing2DPublic Class Form1 Dim WallPapersImages As New... 阅读全文
posted @ 2015-03-26 10:25 Youjun 阅读(226) 评论(0) 推荐(0)