From Dengan Backround Gradiasi Warna Pada VB6

11 06 2009

Form pada tampilan awalnya berwarna abu-abu..mungkin untuk beberapa orang termasuk saya merasa bosan atau jenuh .
Jika anda merasa bosan dengan tampilan dasar dan ingin mencoba dengan tampilan Backround Gradiasi, anda bisa ikuti langkah berikut..mudah koq .

Pertama pada tampilan awal Visual Basic buka jendela kode, lalu ketikan koding berikut:

Private Sub Form_Load()
Form1.AutoRedraw = True
For Y = 0 To ScaleWidth
Line (1, Y)-(ScaleWidth, Y), _
RGB(220, 200, 255 – (Y * 255) \ ScaleWidth)
Next Y
End Sub

Tampilannya akan seperti ini .

Catatan:

Angka 220 dan 200 pada koding dapat anda rubah-rubah untuk mendapatkan hasil gradiasi warna yg lain.

maTLey


Aksi

Information

2 responses

7 07 2009
bom2

thank’s ya bang tutorial’a..!

sukses dech wat blog’a…

9 07 2009
matley

ia dde sma2..smoga brmanfaat ya .




%d blogger menyukai ini: