Jam Digital With Image list In Visual Basic

Langsung ajj
Ane anggap dah pda tau s'mua cara ngebuka vb 6.0 Dan Pilih Standar exe.
Yg Harus di sediakan..:
1.Form
1.picture box
1.timer
4.Lable
6.image Dengan ukuran (615x1215)
1.Image list
dan surce code..
Ikuti langkah" Di bawah Ini,...!
(*)
1.bikin 1 buah pictureBox
2.bikin 6 buah Image Seperti Di bawah Ini..!

3.bikin 4 Lable (Label1 dan 2 Ganti Caption'a Dengan :"titik 2" lalu setting Font'a Dan Untuk Label 3 Dan 4 Kosongkan Caption'a)
Example:!

4.tekan Tombol Ctrl+T (Untuk Membuka components) Cari dan Centang Microsoft Windows Common Controls 6.0(SP6) Lalu OK..!
5.Klik Image list Di TollBox Sebelah kiri, Drag Ke From Menu
6.Download Dullu Neh Image Clock'a , Klo sudah Ngedownload'a,Klik kanan di Image list Image Lalu masukan Image yg barusan Di download Sesuai urutan awali dengan 1 dan akhiri dengan 0..!

7.Bikin 1Timer (Terserah mau di Taro Mna..!)lalu,masukan surce code di bawah Ini Kedalam Form

'Surce code By.Loys4&3L1k
'Visit http://Skankingmyfams.co.cc
'About Me
'Loys3@Devilzhackerz.in
'Loys4@Hacker-Newbie.co.cz

Private Declare Sub SetWindowPos Lib "User32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long)
Const HWND_TOPMOST = -1
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40

Private Sub Form_Load()
Label3.Caption = Time & " - " & Format(Date, "Long Date")

SetWindowPos hWnd, HWND_TOPMOST, Left / 15, Top / 15, Width / 15, Height / 15, SWP_NOACTIVATE Or SWP_SHOWWINDOW

Timer1.Interval = (1 - (Int(Timer) Mod 1)) * 1000
End Sub

Private Sub Timer1_Timer()
On Error GoTo Eror
Dim t As String, J1 As Integer, J2 As Integer, M1 As Integer, M2 As Integer, D1 As Integer, D2 As Integer

t = Time

If Len(Time) = 10 Then t = 0 & t

t = Replace(t, ":", "")
t = Replace(t, " ", "")
Label4.Caption = Right(t, 2)
t = Replace(t, "PM", "")
t = Replace(t, "AM", "")

J1 = Mid(t, 1, 1)
J2 = Mid(t, 2, 1)
M1 = Mid(t, 3, 1)
M2 = Mid(t, 4, 1)
D1 = Mid(t, 5, 1)
D2 = Mid(t, 6, 1)

ClockSet Image1, J1
ClockSet Image2, J2
ClockSet Image3, M1
ClockSet Image4, M2
ClockSet Image5, D1
ClockSet Image6, D2
Label3.Caption = Format(Date, "Long Date")

Exit Sub
Eror:
If Err = 13 Then MsgBox "This program will only work if you set 'Start, Settings, Control Panel, Regional Settings, Time, Time separator:' to ':' (colon).", 16, "Error"
Unload Form1
End Sub

Sub ClockSet(Img As Image, Number As Integer)
If Number = 0 Then Number = 10
Img.Picture = ImageList1.ListImages.Item(Number).Picture
End Sub

8.Test Dengan Menekan TomBO'OL F5..! Dan Lihat Hasil'a..!

9.klo sudah silakan Klik File >make Project1 exe.


Nb :untuk masalah Design Ane ggk bisa jelasin Coz'a di Sini Mau Banjir So ane hru siap" Jdi Kuli Panggul Buat Ngangkatin Barang" Rumah(Eh Ko mlh Curhat :) )ydh Silakan Design Sendiri iya omz..!
and Klo Kurang Jlas PM me omz..!

Surce Code Boleh Copas Asal Jng Lupa Pemilik'a..! :)

Read More

Me Belajar MYSQL (2)

SQL...")
sQL Merupakan Kependekan Dari STRUCTURED QUERY LANGUAGE.SQL Digunakan untuk berkomunikasi dengan sebuah database.Sesuai dengan ANSI,SQL Merupakan bahasa standar Untuk sistem manajemen database relasional.
Statemen SQL Digunakan untuk Melakukan Tugas" Seperti Melakukan Update Terhadap Database,atau mengambil data dari database.
Beberapa database Relasional Yang Menggunakan SQL dan Cukup Ngetop adalah :MYSQL,ORACLE,SYBASE,MICROSOFT SQL SERVER,ACCES,INGRES,ETC.
Meskipun Sebagian Besar Sistem Database Menggunakan Sql,Namun sebagian besar Memiliki Ekstensi khusus yang hanya bisa di gunakan si sistem masing",namun demikian,perintah standar SQL Seperti "select",Insert,Update,Delete,Create,Drop.Dapat Digunakan Untuk Melakukan hampir semua hal yang perlu dilakukan terhadap sebuah database.Tutorial ini akan mengenalkan kamu pada penggunaan dasar dari perintah tersebut.
kamu bisa praktek dengan menginstal MYSQL atau Database Lain dikomputer kamu.

Pengenalan Query...")
Query Merupakan senjata utama dalah bekerja sehari" dengan database.
Istilah Query Yg digunakan untuk menyatakan berbagai perintah SQL. Setiapperintah melakukan beberapa hal terhadap database,sedangkan SELECT akan memilih baris" yang sudah pernah kamu sisipkan dalam database.

konstruksi Query Di Mulai Dengan Salah satu Perintah Berikut:

->ADD
->DROP
->CREATE
->UPDATE
->REPLACE
->DELETE

Query Memiliki banyak Kelonggaran dalam penulisanya.Spasi Dan Enter tidak begitu di perhatikan dalam penulisannya.arti'a kalau kebetulan salah tulis spasinya kebanyakan,tidak masalah.

Read More

Me Belajar MYSQL(1)

*MYSQL Adalah Sebuah Server DataBase Open Surce Yg kayaknya paling populer kebradaanya.
MYSQL umumnya digunakan bersamaan dengan scrip PHP Untuk MemBuat Aplikasi Server Yg Dinamis N' Powerful..
*DataBase adalah Sebuah struktur yang umumnya dikatagorikan dalam 2 hal.data base flat dan database relasional.Database Relasional Lebih Di sukai Karena Lebih Masuk Akal Dibandingkan Dengan Database flat.(MYSQL adalah Sebuah database Relasional)
pada database yang memiliki struktur relasional.ada table-table yang menyimpang data.Setiap table terdiri dari kolom dan baris.
Kolom Mendefiniskan Jenis Informasi apa yg akan di simpan.
kolom khusus untuk sebuah jenis informasi yg ingin di simpan ,Misal'a:umur,tinggi,berat,paswor,alamat,id.
kalu kolom mendefinisikan jenis informasi apa yang akan di simpan,maka sebuah baris dari kolom adalah data aktual yang di simpan.
setiap baris table adalah isi dari table tersebut dan berisi nilai" untuk setiap kolom table tersebut (Contoh Isi Dari Table: nama Alim,Umur 19 tahun,tinggi 120cm,berat45kg).
NB:Database sangat penting/berguna untuk menyimpan informasi

Read More

Hidden Folder Via MS-DOS/Notepad

("Terkadang Qta Ggk Ingin File Or Data" Penting Qta Di Lihat /Di buka Org Lain..!
Maka Dri Itu Neh W kasih Solusi'a..!
W Depet Trik Neh Dah Lama Banget Cuma Wktu Itu w Ngga Ngerti Sama Sekali Tentang Scrip ...!

Langsung ajj..!
1. Buka Notepad(Start->All Programs->Accesories->Notepad)
2. Copy Sorce Code Di Bawah Ini Ke NotePad

CLS
@ECHO OFF
Title By.Loys4 N' 3L1k
If EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto PERTANYAAN
If NOT EXIST Folder-Loys4 goto MDFOLDER
:KONFIRMASI
Echo Apakah anda ingin mengunci Folder ini? ? (Y/N)
Echo Tekan Tombol [Y/y] atau [N/n].
Set/p "cho=>"
If %cho%==Y goto KUNCI
If %cho%==y goto KUNCI
If %cho%==N goto END
If %cho%==n goto END
Goto KONFIRMASI
:KUNCI
Ren Folder-Loys4 "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
Attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
Echo Folder-Loys4 Terkunci
Goto End
:PERTANYAAN
Echo Masukkan Password untuk membuka folder ini..!!
Set/p "pass=>"
If %pass%== Buka goto BUKA
If NOT %pass%== Buka goto SALAH
:BUKA
Attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
Ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Folder-Loys4
Echo Seeep Secceeessss,Folder sudah di buka
Pause
Goto End
:SALAH
Echo Password yg anda masukan salah Broo..!!
Pause
Goto End
:MDFOLDER
Md Folder-Loys4
Echo Folder telah berhasil di buat.
Pause
Goto End
:End

3.Silakan Ganti Taks Yg Kedap-kedip Dengan Password Anda

4.Save Dengan Name Make-it N' Extension'a Vbs(Make-it.Vbs)
5.Double Klik Make-It.(Untuk Membuat Folder Sendiri Dengan Name"Folder-Loys4")
6.Simpan File"/Data" Yg Menurut anda Penting Kedalam Folder-Loys4
7.Double Klik Lgi Make-it'a ,Untuk Mengunci/Hidden Folder(Ketik Y->Enter Untuk Yes Dan N->Enter Untuk No)
Selesai N' Lihat Folder Loys4 ...!

*)Untuk Membuka Folder'a)Double Klik Make-it lalu masukan Password anda...!
NB: Name Make-it Tidak Dapat Di Edit..!

Read More

Disable And Enable Task Manager

Cara Pertama..")

1.Buka Run(Tekan tombol windows+R)
2.Ketik "gpedit.msc"(Tanpa Tanda kutip)
3.double Klik User Configuration->administrative Templates->System->Ctrl+Alt+Del Options(Di sebelah kanan)
4.Klik kanan->Properties Pada Remove Task Manager
5.Ganti Dengan Enable or Disable Lalu Ok ..!!!

Cara Kedua..")

1. Buka Run (Tekan Windows+R).
2.Ketik "Regedit" (Tanpa tanda kutip).
3.Klik HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System.
4.Cari Value "disable Taskmgr"(Tanpa Tanda Kutip)
5.Klik Kanan->Delete
6.Tutup Jendela Registery Editor.Lalu coba Dengan Menekan Tombol Ctrl+Alt+Del..!!

Cara Ketiga..")
Download sofware buatan ane
Disini..! (No Viruz)
Cranya cukup Gampang Tinggal Klik Enable or Disable Sesuai Keinginan Anda..!
NB:Password rar {loys4}

Semoga Membantu

Read More

Memblokir situs PoRno via Local host..!(Tanpa Software)

Kemaren Tmn ane Nanya(Loy cara Nge Blokir situs Gimana Tanpa software??)
Jwb ane..(

Ikutin Langkah" dI Bawah ini..!
1.buka run (Dng Cara Tekan Tombol Windows+R)

2.Ketik C:\WINDOWS\system32\drivers\etc (Enter)

3.Buka File Hosts Dengan Notepad..!(Hasil'a Akan Seperti ini)

4.Ganti Tulisan localhost Dengan Situs Yg mau di Blokir(Misal'a Situs Porno Seperti www.Redtube.com)
 Maka Hasil'a Seperti Ini..!

5.Kalo Situs'a Lebih Dri satu Yg Ingin Di Blokir Tambahkan Dengan di awali 127.0.0.1 lalu nama situs'a
Example: Kita pakai Situs Youpron.com.Dan Situs" Yg anda tidak suka..!
Hasil'a Seperti ini...!

6.Jng Lupa di Save....










NB: Ini hanya Suport Di browser Firfok saja..!
Klo yg Laen Mungkin Ad Yg Tau..!
Tq.

Read More

Hack Password Menggunakan Sofware (REFOG)

hii sobat ,,yg masih pada bingung bwat ngehack facebook orang  lain..
nah w dapet cara'a ,tapi pakai sofware che..
Aman ko Ggk ada virusnya hhaahha..

langsung ajj dah..!

persiapan..
1.mandi dullu ..(biar bersih)
2.pake celana dan baju + sempak wkwkwk (biar ngga masuk angin )
3.download dullu neh REFOG
4.instal progam'a..
5.jalankan perintah-perintah'a seperti next,next,.install...finish
6.klik tombol warna hijaw pada sudut tol bar sebelah kiri 
7.keluar/close..!!

bwat yg mw ngehack d,warnet kya'a susah deh..(kalo warnet'a ada deep freez'a)
tpi klo llu tau cara ngebobol deep freeze'a sih bisa ajj..
dijamin work 100% hhaahhaa..!!.

nB:cara ngebuka'a klik start >run>(ketik)>runrefog...

selamat bersenang senang..!!

Read More

Hack facebook tantpa sofware

sekedar berbagi pengalaman..!
hack facebook tanpa sofware
mungkin kata orang [ah mang ada ape..?]

langsung ajj dah Ggk pake banyak bacot.
Hack fecebook tanpa sofware..
1.klik facebook..(ingat sebelum me-klik jangan login facebook ,karna disini qta membicarakan tentang membobol facebook orang lain).
2.Alamat mail anda.(masukan mail yg sedang anda pakai.)
3.Apakah alamat mail anda telah berubah?.(pilih ya.)
4.apakah anda menghubungi kami dari alamat mail yg mula'a terkait dengan akun anda?.(pilih ya)
5. mail yang terkait dengan akun yang dibobol(ketik mail llu ajj.)
6.nama lengkap pada akun.(ketik nama profil korban yang mo dihack.)
7. tanggal lahir (ketik ajj asal asalan.)
8 URL?(alamat web)profil yang dibajak.(buka profil korban yang mau dihack,lalu copy alamat URL'a)
9.kirim(jangan ragu").

sambil menunggu balasan dari pihak facebook mari kita berDo'a

semoga berhasil... hhaahhay.!!

Nb:jangan ragu"or ngeri

Read More