Di bawah ini merupakan fungsi VB6 untuk merubah desktop wallpaper. Bagaimana implementasinya dalam Visual Basic 6.0?Option ExplicitPrivate Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal...
Saturday, April 3, 2010
VB6 Code - Fungsi Untuk Merubah Desktop Wallpaper
READ MORE - VB6 Code - Fungsi Untuk Merubah Desktop Wallpaper
VB6 - Menyembunyikan Dan Menampilkan Windows Taskbar
Di bawah ini merupakan contoh standar untuk menyembunyikan dan menampilkan windows taskbar menggunakan Visual Basic 6.Option ExplicitPrivate Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long,...
VB6 Code - Menampilkan Kotak Dialog Shutdown
Di bawah ini merupakan fungsi API untuk menampilkan kotak dialog shutdown menggunakan kode VB6. Fungsi yang digunakan adalah SHShutDownDialog yang terdapat pada Shell32.dll.Option ExplicitPrivate Declare Function SHShutDownDialog Lib "shell32" Alias...
VB6 Code - Fungsi Untuk Memeriksa Resolusi Screen
Di bawah ini merupakan fungsi VB6 untuk mengetahui resolusi screen. Bagaimana implementasinya dalam Visual Basic 6.0? bisa kita simak kodenya di bawah ini:Option ExplicitPublic Function ScreenResolution(iWidth, iHeight) As String iWidth = Screen.Width...
VB6 Code - Drag Form Yang Tidak Memiliki Controlbox
Di bawah ini merupakan fungsi VB6 (menggunakan fungsi API) untuk men-drag form yang tidak memiliki Control Box.Option ExplicitPrivate Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam...
VB6 Code - Mencari Aplikasi Asosiasi Sebuah File
Di bawah ini merupakan fungsi VB6 untuk mencari aplikasi yang diasosiasikan terhadap sebuah file. Bingung? misalnya kita double klik file berektensi .ini maka aplikasinya notepad.exe, double klik file berektensi .doc maka aplikasinya Microsoft Word,...
VB Code - Mengubah Object LeftToRight Menjadi RighToLeft
Di bawah ini merupakan fungsi VB6 untuk mengubah objek yang tidak memiliki properties LeftToRight agar seolah-olah memiliki properties tersebut. Melalui akal-akalan fungsi API, hal tersebut mungkin untuk dilakukan.Option ExplicitPrivate Declare Function...
VB6 Code - Download File Menggunakan IE
Di bawah ini merupakan procedure VB6 untuk mendownload sebuah file dengan memanfaatkan file bawaan IE (internet explorer) hdocvw.dll. Bagaimana implementasinya dalam Visual Basic 6.0? bisa Anda simak kodenya di bawah ini:Option ExplicitPrivate Declare...
VB6 Code - Apakah Aplikasi Masih Dalam IDE VB6
Ini merupakan cara yang cerdik untuk mengetahui apakah sebuah aplikasi masih dalam IDE Visual Basic 6.0 ataukah sudah dicompile. Procedurenya sangat sederhana sekali yakni dengan memanfaatkan handle error. Public Function IsIDE() As BooleanOn Error GoTo...
VB6 Code - Memindahkan File Ke Recycle Bin
Di bawah ini merupakan procedure VB6 untuk memindahkan/menghapus file ke dalam recycle bin. Bagaimana kodenya dalam Visual Basic 6.0? bisa kita simak di bawah ini:Option ExplicitPrivate Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA"...
VB6 Code - Menghapus Seluruh File Recycle Bin
Di bawah ini merupakan fungsi VB6 untuk menghapus seluruh file yang terdapat pada recycle bin. Bagaimana implementasinya dalam Visual Basic 6.0? bisa Anda simak kodenya di bawah iniOption ExplicitPrivate Declare Function SHEmptyRecycleBin Lib "shell32.dll"...
VB6 Code - Apakah Recycle Bin Kosong?
Di bawah ini merupakan fungsi VB6 untuk memeriksa apakah recycle bin kosong? Bagaimana implementasinya dalam Visual Basic 6.0? bisa Anda simak kodenya dibawah ini:Option ExplicitPrivate Type SHQUERYRBINFO cbSize As Long i64SizeLo As Long i64SizeHi...
VB6 Code - Menghapus Seluruh File Recent Document
Di bawah ini merupakan procedure VB6 untuk menghapus seluruh yang terdapat pada recent document. Untuk keperluan ini digunakan satu fungsi API yakni SHAddToRecentDocs yang terdapat pada shell32.dll.Option ExplicitPrivate Declare Sub SHAddToRecentDocs...
VB6 Code - Membuat Efek Bayangan Pada Objek
Di bawah ini merupakan fungsi VB6 untuk membuat efek bayangan pada sebuah objek. Bagaimana implementasi dalam Visual Basic 6.0? bisa Anda simak kodenya di bawah ini:Option ExplicitPublic Function Shadow(frm As Form, ctl As Control, Optional shWidth =...
VB6 Code - Menambahkan File Ke Recent Document
Di bawah ini merupakan fungsi VB6 (API) untuk menambahkan file ke recent document. Untuk keperluan ini digunakan satu fungsi API yakni SHAddToRecentDocs yang terdapat pada shell32.dll.Option ExplicitPrivate Declare Sub SHAddToRecentDocs Lib "shell32.dll"...
VB6 Code - Class Untuk Mengetahui Crc32 Dari Sebuah File
Di bawah ini merupakan class VB6 untuk mengetahui CRC32 dari sebuah file. Untuk keperluan ini copy dan pastekan kode di bawah ini ke dalam class, kemudian ganti nama kelasnya menjadi clsCRC.Option ExplicitPrivate crcTable(0 To 255) As Long 'crc32Private...
VB6 Code - Mencegah Aplikasi Dijalankan Dua Kali - Part-2
Di bawah ini merupakan prosedure VB6 kedua masih mengenai cara mencegah aplikasi dijalankan dua kali. Bagaimana implementasinya dalam Visual Basic 6.0? bisa Anda simak kodenya di bawah ini:Option ExplicitDeclare Function OpenIcon Lib "user32" (ByVal...
VB6 Code - Mengetahui Jumlah Tombol Yang Terdapat Pada Mouse
Di bawah ini merupakan fungsi VB6 untuk mengetahui jumlah tombol yang terdapat pada mouse.Option ExplicitPrivate Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As LongPrivate Const SM_CMOUSEBUTTONS As Long = 43Public Function ButtonMouse()...
VB6 Code - Apakah Mouse Terinstall Pada Komputer Anda?
Di bawah ini merupakan fungsi VB6 untuk memeriksa apakah mouse terinstall pada komputer Anda. Bagaimana implementasinya dalam Visual Basic 6.0? simaklah kodenya di bawah ini.Option ExplicitPrivate Const SM_CMOUSEBUTTONS = 43Private Declare Function GetSystemMetrics...
VB6 Code - Merubah Waktu Double Klik Pada Mouse
Di bawah ini merupakan fungsi VB6 untuk merubah waktu double klik pada mouse. Bagaimana implementasinya dalam Visual Basic 6.0? Simaklah kodenya di bawah ini.Option ExplicitPrivate Declare Function SetDoubleClickTime Lib "user32" (ByVal wCount As Long)...
VB6 Code - Mencegah Aplikasi Dijalankan Dua Kali
Di bawah ini merupakan cara termudah untuk mencegah sebuah aplikasi dijalankan dua kali (double instance) menggunakan VB6. Bagaimana implementasinya dalam Visual Basic 6.0? Simaklah kodenya di bawah ini.Option ExplicitPrivate Sub ActivatePrevInstance()...
VB6 Code - Memindahkan Seluruh File Dalam Satu Directory
Di bawah ini merupakan fungsi VB6 untuk memindahkan seluruh file dari satu directory tertentu. Untuk keperluan ini Anda harus mereferensi pada objek Microsoft Scripting Runtime atau scrun.dll.Option ExplicitPublic Function MoveAllFiles() Dim fso As...
VB6 Code - Mengcopy Seluruh File Dalam Satu Directory
Di bawah ini merupakan fungsi VB6 untuk meng-copy seluruh file dari satu directory tertentu. Untuk keperluan ini Anda harus mereferensi pada objek Microsoft Scripting Runtime atau scrun.dll.Option ExplicitPublic Function CopyAllFiles(Source As String,...
VB6 Code Konversi Warna Dari Qbcolor Ke RGB
Di bawah ini merupakan fungsi VB6 untuk meng-konversi warna dari QBColor ke RGB. Bagaimana implementasinya dalam Visual Basic 6.0? simak kodenya di bawah ini:Public Sub QBColorToRGB(QBColorValue As Integer) QBColorToRGB = LongToRGB(QBColor(QBColorValue))End...
VB6 Code - Konversi Warna Dari Rgb Ke Long
Di bawah ini merupakan fungsi VB6 untuk meng-konversi warna dari RGB(red, green, blue) ke Long. Bagaimana implementasinya dalam Visual Basic 6.0? simak kodenya di bawah ini:Public Function RGBToLong(Red As Integer, Green As Integer, Blue As Integer)...
VB6 Code - Konversi Warna Long Ke RGB
Di bawah ini merupakan fungsi VB6 untuk meng-konversi warna dari long ke rgb (red, green, blue). Bagaimana implementasinya dalam Visual Basic 6.0? simak kodenya di bawah ini:Public Sub LongToRGB(Color As Long, Red, Green, Blue) Blue = Color \ 65536...
VB6 Code - Konversi Warna Dari RGB Ke Hex
Di bawah ini merupakan fungsi VB6 untuk meng-konversi warna dari rgb (red, green, blue) ke Hex. Bagaimana implementasinya dalam Visual Basic 6.0? simak kodenya di bawah ini:Public Function RGBToHex(Red As Integer, Green As Integer, Blue As Integer) ...
VB6 Code - Konversi Angka Dari Hexa Ke Decimal
Di bawah ini merupakan fungsi VB6 untuk mengkonversi angka dari hexadecimal ke decimal dan sebaliknya. Adapun kode untuk mengkonversi angka dari hexa ke decimal dan sebaliknya menggunakan VB6 adalah sebagai berikut:Option ExplicitPublic Function DecToHex(DecNumber)...
VB6 Code - Menyembunyikan Dan Menampilkan Pointer Mouse
Di bawah ini merupakan procedure VB6 untuk menyembunyikan dan menampilkan pointer mouse. Bagaimana implementasinya dalam Visual Basic 6.0, simaklah kodenya di bawah ini:Option ExplicitPrivate Declare Function ShowCursor Lib "user32" (ByVal bShow As Long)...
VB6 Code - Vertical Scrollbar Textbox Pada Saat Runtime
Di bawah ini merupakan fungsi VB6 untuk menampilkan Vertical ScrollBar pada TextBox. Option ExplicitPrivate Declare Function ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As LongPublic Function ShowScroll(obj...
VB6 Code - Fungsi Untuk Membentuk Form Dari Huruf
Di bawah ini merupakan fungsi VB6 untuk membentuk form dari sebuah huruf, kata, atau kalimat. Untuk keperluan ini Anda dapat memodifikasi besar serta jenis hurufnya. Untuk keperluan-keperluan yang seperti ini, kita tidak bisa memprogramnya secara langsung...
VB6 Code - Fungsi Untuk Menghancurkan File
Di bawah ini merupakan fungsi VB6 untuk menghancurkan file. Maksud dari fungsi ini, agar file yang sudah dihapus/dihancurkan, tidak dapat direcover dengan software-software recovery.Core function dari fungsi penghancur file ini hanyalah 3 line code,...
VB6 Code - Procedure Membatasi Pointer Mouse
Di bawah ini merupakan procedure VB6 untuk membatasi gerak pointer mouse pada objek tertentu yang memilliki hwnd (handle window).Option ExplicitPrivate Declare Sub ClipCursor Lib "user32" (lpRect As Any)Private Declare Sub GetClientRect Lib "user32"...
VB Code - Menukarkan Tombol Mouse
Di bawah ini merupakan procedure VB6 untuk menukarkan tombol mouse, dari kiri ke kanan dan sebaliknya. Bagaimana implementasinya dalam Visual Basic 6.0, simaklah kodenya di bawah ini:Option ExplicitPrivate Declare Function SwapMouseButton Lib "user32"...
VB6 Code - Menggerakan Pointer Mouse Satu Koordinat
Di bawah ini merupakan fungsi VB6 untuk menggerakan pointer mouse pada koordinat tertentu.Private Declare Function SetCursorPos Lib "User32" (ByVal X As Long, ByVal Y As Long) As LongContoh penggunaan code untuk menggerakan pointer mouse pada koordinat...
VB6 Code - Menutup Seluruh Aplikasi Yang Sedang Berjalan
Di bawah ini merupakan fungsi VB6 untuk menutup seluruh aplikasi yang sedang berjalan. Mengapa seluruh aplikasi yang sedang berjalan tersebut harus ditutup? contoh kecilnya dalam pembuatan billing warnet. Misalnya A (user) log-out, kemudian datang B...
VB Code - Meng-capture Screen .bmp Atau .jpg (Ezcapture.dll)
Di bawah ini merupakan fungsi VB6 untuk meng-capture (mengambil) gambar screen dalam format .bmp atau format .jpg dengan menggunakan ActiveX ezCapture.dll. Untuk keperluan ini tentu saja Anda harus memiliki dll ezCapture.dll kemudian mereferensikan project...
VB6 Code - Menjalankan File .wav Menggunakan Visual Basic
Di bawah ini merupakan fungsi VB6 untuk menjalankan file .wav dengan menggunakan Visual Basic 6.0 disertai dengan beberapa argumen yang dibutuhkan.Option ExplicitPublic Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName...
VB6 Code - Mendapatkan Source Html Dari URLTertentu
Di bawah ini merupakan fungsi VB6 untuk mendapatkan source code HTML dari URL tertentu.Option ExplicitFunction GetSource(ByVal URL As String) As String MousePointer = vbHourglass Dim Data() As Byte Dim sText As String Dim i As Long...
VB Code - Menghapus Seluruh Komentar Visual Basic 6.0
Di bawah ini merupakan fungsi VB6 untuk menghapus seluruh komentar yang terdapat dalam source code Visual Basic 6.0. Kami membuatnya menjadi dua fungsi, fungsi pertama untuk menghapus seluruh komentar sedangkan fungsi yang kedua untuk menghapus seluruh...
VB Code - Fungsi Personal Editor Html Unordering List [ ul ]
Ini merupakan fungsi VB6 yang digunakan untuk membuat personal editor. Tag yang akan kita modifikasi adalah tag UL (Unordering List). Option ExplicitFunction UL(strText As String) As String Dim sText As String Dim aText() As String Dim i As...
VB6 Code - Fungsi Encode Dan Decode Tag HTML
Mengenai Fungsi VB6 untuk meng-encode dan decode tag HTML - Kode HTML yang dituliskan dalam sebuah tulisan/postingan tentu saja tidak dapat ditulis secara langsung tetapi harus dikonversi terlebih dahulu agar format tulisannya sesuai dengan apa yang...
VB6 Code - Fungsi Personal Editor HTML Ordering List [ ol ]
Ini merupakan fungsi VB6 yang digunakan untuk membuat personal editor. Tag yang akan kita modifikasi adalah tag OL (Ordering List). Option ExplicitFunction OL(strText As String) As String Dim sText As String Dim aText() As String Dim i As Integer...
Thursday, April 1, 2010
Blogging - Membuat Menu Drop Down Pada Blogspot
Mengenai cara membuat menu dropdown pada blogspot - Untuk membuat menu dropdown,selain membuat situs lebih rapi,juga sambil belajar yuk!Untuk kodenya copy paste kode di bawah ini :<form><select name="menu"onchange="window.open(this.options[this.selectedIndex].value,'_blank')"size=1name=menu><option...
VB Code - Mengisi Seluruh Fonts Ke Dalam Listbox
Di bawah ini merupakan fungsi VB6 untuk mengisi seluruh fonts yang ada dalam komputer Anda ke dalam objek ListBox pada dasarnya Anda dapat menggunakan objek selain ListBox seperti ListView, TreeView, dll.Public Function LoadAllFonts(lst As Control) ...
Subscribe to:
Posts
(
Atom
)
