1與0的世界

暫停數秒讓cpu可以釋放讓其它工作可以繼續
Application.DoEvents()

.Net2.0中新增了很多组件，WebClient就是其中一个，功能也很强大，今天拿WebClient做了一个小实验，只用到了一些很简单的功能就可以实现以前不好实现的功能，很方便。

    简单介绍一下WebClient：

            Dim objOS As Object
            For Each objOS In GetObject("winmgmts:{(Shutdown)}").InstancesOf("Win32_OperatingSystem")

Public Class Frm漸層表單

    Private Sub Frm漸層表單_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint

    Private Sub Frmscreensaver_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
        Static start As Boolean = True

    Private Sub ToolStripButton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton4.Click
        Dim mail As New MailMessage(Me.TextBox1.Text, Me.TextBox2.Text, Me.TextBox3.Text, Me.RichTextBox1.Text)

Public Class Form1
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Public Class CalendarColumn
    Inherits DataGridViewColumn

Imports System.Data.SqlClient
Imports System.Web.Security

Private Function CheckID(ByVal UserID As String) As Boolean
        Dim AreaNo As Long