Kali ini saya akan posting sedikit kode jail dengan VB.net, Kode ini berfungsi mengganti nama Semua File yang terbuka pada komputer sobat, dengan nama yang sudah di tentukan...
Asset : Timer
Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Integer, ByVal wCmd As Integer) As IntegerPrivate Declare Function GetDesktopWindow Lib "user32" () As IntegerPrivate Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Integer, ByVal lpString As String) As Integer
Dim i As Integer
'ketik pada tombol atau timer
i = GetWindow(GetDesktopWindow(), 5)
Do While i <> 0
SetWindowText(i, "TULIS NAMA DI SINI")
i = GetWindow(i, 2)
Loop
Sumber : PutraVB
Asset : Timer
Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Integer, ByVal wCmd As Integer) As IntegerPrivate Declare Function GetDesktopWindow Lib "user32" () As IntegerPrivate Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Integer, ByVal lpString As String) As Integer
Dim i As Integer
'ketik pada tombol atau timer
i = GetWindow(GetDesktopWindow(), 5)
Do While i <> 0
SetWindowText(i, "TULIS NAMA DI SINI")
i = GetWindow(i, 2)
Loop
0 komentar:
Posting Komentar
Setelah melihat - lihat, Alangkah baiknya memberikan komentar mengenai Blog ini.
Kritik dan Saran teman-teman semua, Saya anggap sebagai masukan buat saya... terima kasih telah berkunjung