Auto Scroll Up n Bottom

Buat 2 Command Button, 1 Listbox, 1 textbox.

Masukkan souce ini ke dalam Form :Private Const SBBOTTOM As Long = 7 Private Const SBUP As Long = 6 Private Const WMVSCROLL As Long = &H115 Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByRef lParam As Any) As Long Public Sub ScrollToBottom(ByVal hWnd As Long) SendMessage hWnd, WMVSCROLL, SBBOTTOM, ByVal 0& End Sub Public Sub ScrollToUp(ByVal hWnd As Long) SendMessage hWnd, WMVSCROLL, SBUP, ByVal 0& End Sub Private Sub Command1_Click() If Command1.Caption = "Scroll To Bottom" Then ScrollToBottom List1.hWnd Command1.Caption = "Scroll To Up" Else Command1.Caption = "Scroll To Bottom" ScrollToUp List1.hWnd End If End Sub Private Sub Command2_Click() If Command2.Caption = "Scroll To Bottom" Then ScrollToBottom Text1.hWnd Command2.Caption = "Scroll To Up" Else Command2.Caption = "Scroll To Bottom" ScrollToUp Text1.hWnd End If End Sub Private Sub Form_Load() Command1.Caption = "Scroll To Bottom" Command2.Caption = "Scroll To Bottom" Form1.Caption = "Auto Scroll" List1.AddItem "1" List1.AddItem "2" List1.AddItem "3" Text1.Text = "1" & vbNewLine & "2" & vbNewLine & "3" End Sub

Menambahkan GPEDIT.MSC pada Windows XP Home Edition

Bingung tentang GPEDIT.MSC coba cari google yah. Tanpa Basa Basi silahkan unduh >>>>Download

Membuang Space Yang Berlebih Pada Sebuah Kalimat

Masukkan souce ini ke dalam Form :Public Function TrimALL(ByVal TextIN As String) As String TrimALL = Trim(TextIN) While InStr(TrimALL, String(2, " ")) > 0 TrimALL = Replace(TrimALL, String(2, " "), " ") Wend End Function Private Sub Form_Load() MsgBox TrimALL("Hello ! ! ! This function removes all extra spaces from strings") End Sub

ARBI Resource

Aplikasi ini untuk membaca atau menampilkan isi file berextension .res, juga dapat mengextract isi file .res tersebut yang berextension .exe(aplikasi).

Silahkan Unduh Download

Context My Computer

aplikasi ini untuk menambahkan beberapa context(klik kanan) pada My Computer. cukup dengan memberikan centang pada aplikasi maka context akan bertambah pada My Computer. baru uji tes di WINDOWS XP, kemungkinan bisa dijalankan di WINDOWS 7
Silahkan Unduh >>>>>>>>>>>>>>>>>>>>>> Download

Menampilkan Context Menu (Right Click) WINDOWS XP

Ada beberapa cara utk Menampilkan Context menu :
1. Tahan Shift+F10
2. Klik kanan Pada mouse
3. Tekan Tombol bersimbol seperti gambar dibawah pada keyboard.

Context Menu Handle Shutdown

Aplikasi yg berguna utk menambahkan sub context pada semua drive,folder,dan file. cukup 1x klik PC/laptop anda akan mati (shutdown) dengan cepat...

Silahkan unduh >>>>>> Download

By: ARBI Blog's

Penjelasan Context Menu Windows XP

Context adalah text yg terhubung dalam sebuah command atau perintah. dapat juga diartikan bahwa context adalah sebuah jalan penghubung utk melakukan suatu command.

Delete Prefetch, Temp & Recent Document (DPTR)

sesuai namanya...buat apus2 file2 sampah diwindows XP.Download

Security Image Manager

wekekek...kita bisa simpan semua gambar-gambar kita disini...bisa pake password...xixix..tapi password na masih keliatan blm sempet dikembangin...
Silahkan Unduh >>>>>>>>>>>>>>>>> Download

Hide Drive (Sembunyikan Drive)

Aplikasi ini berguna utk menyembunyikan Drive. Drive disini dalam artian menyupir mobil ha..ha..ha.ha.h.a.h.a.. driver atuh tuh mah akang...!!!wkwkwkwkkw.....

Drive itu yg ada di explorer yg berisi folder-folder kita... Exp : Drive C: , Drive D , Drive E dst.
nah tuh semua bakal disembunyikan oleh nih aplikasi... kelebihan nih aplikasi bukan cuman bisa sembunyikan drive, drive yg disembunyikan tadi juga g bakal bisa diakses melalui DOS.

Silahkan Unduh >>>>>>>>>>>>>>>>>>>>>>>> download