- Rabu, 19 Desember 2012

Cara Merubah Warna Progress Bar di Visual Basic

Untuk merubah warna progress bar atau loading bar di visual basic, tambahkan satu modul (Add > Module).
Lalu tuliskan source code di bawah ini di module tersebut.

Private Declare Function SendNotifyMessage Lib "user32.dll" Alias "SendNotifyMessageA" (ByVal hwnd As Long, ByVal msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Public Sub SetPrgColor(Prg As ProgressBar, ForeColor As OLE_COLOR, BackColor As OLE_COLOR)
SendNotifyMessage Prg.hwnd, (&H400 + 9), 0, ForeColor
SendNotifyMessage Prg.hwnd, (&H2000 + 1), 0, BackColor
End Sub

Lalu untuk merubah warna ketikkan kode berikut ini

SetPrgColor ProgressBar1, vbBlue, vb Red)
atau
SetPrgColor ProgressBar1, RGB(50,100,255), RGB(3, 60, 225)



Oke sekian dulu info dari saya..
:)

1 komentar: