電腦心得及科學隨筆

ISP 業者

SMTP 服務主機

中華電信 Hinet

msa.hinet.net

數位聯合電信 Seednet

seed.net.tw

So-net

so-net.net.tw

和信GIGA

smtp.giga.net.tw

亞太固網

smtp.apol.com.tw

台灣電訊TTN

smtp.ttn.net

速博

sparqnet.net

東森Cable Modem

ethome.net.tw

類別

說明

SolidBrush

建立單一顏色的筆刷。
例如：建立紅色筆刷，並以紅色筆刷建立畫筆：
Dim sb As SolidBrush =New SolidBrush(Color.Red)
Dim pen As Pen=New Pen(sb,2)

TextureBrush

建立以圖形物件當作圖案的筆刷。
例如：以 檔的圖案建立圖案的筆刷，並以此圖案筆刷建立畫筆：
Dim tb As TextureBrush = New TextureBrush (“bmp1.bmp”)。
Dim pen As Pen= New Pen(tb,2)

HatchBrush

建立花紋筆刷。
建立花紋筆刷的語法：
Dim 花紋筆刷變數 As HatchBrush = New (花紋樣式，前景顏色，背景顏色)
例如：建立藍、紅色波浪花紋筆刷，並以此花紋圖案筆刷建立畫筆：
Dim hb As HatchBrush = New HatchBrush(HatchStyle.Wave, Color.Blue, Color.Red)
pen = New Pen(hb, 10)  ' 建立花紋畫筆
註：花紋筆刷類別包含在 Drawing2D 的命名空間，因此，必須在程式的第一行引用，亦即要加入下列程式碼：
Imports System.Drawing.Drawing2D

LinearGradienBrush

建立漸層筆刷。

建立漸層筆刷的語法：
Dim 漸層筆刷變數 As LinearGradienBrush = New LinearGradienBrush (漸層矩形區域，前景顏色，背景顏色，漸層傾斜角度)
漸層矩形區域是指漸層區塊的大小，通常會定義的比畫筆大，如果定義的比畫筆小，顯示時將會呈現磚塊的效果。漸層矩形區域可以宣告一個矩形區域，例如以整個 PictureBox1 為漸層區域的語法如下：
Dim rect1 As New Rectangle(0, 0, PictureBox1.Size.Width, PictureBox1.Size.Height)
例如：建立藍、紅色垂直漸層筆刷，並以此漸層筆刷建立畫筆。
Dim rect1 As New Rectangle(0, 0, PictureBox1.Size.Width, PictureBox1.Size.Height)
Dim lgb As LinearGradientBrush = New LinearGradientBrush(rect1, Color.Blue, Color.Red, 90)
pen = New Pen(lgb, 10)  ' 建立漸層畫筆
註：漸層筆刷類別包含在 Drawing2D 的命名空間，因此，必須在程式的第一行引用，亦即要加入下列程式碼：
Imports System.Drawing.Drawing2D