14 Oktober 2012

Mengaktifkan Telnet di Windows 7

Berikut langkah langkah untuk mengaktifkan Telnet di Windows 7 : Klik Start Klik Control Panel 
Pilih View By : Large icons atau small icons ( di sebelah kanan atas ) 
Pilih Programs And Features 
Klik Turn Windows features on or off ( di sebelah kiri atas ) 
Beri chek list pada Telnet Client Klik OK.

7 Juli 2012

Avira sound di Vb6


add 1 Command Button

9 Maret 2012

memwarnani progressbar

1 module
1 progressbar1 module
 
 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

private sub form_load()
SetPrgColor ProgressBar1, vbYellow, vbRed
end sub
progressbar
cursor: url("http://i137.photobucket.com/albums/q210/kyawsawdin/FireRed.gif"), default;

ShoutMix chat widget