Owner: :: Oom's Visual Basic Tutorial :: URL:http://oom-vb.blogspot.com/ Join Date: Wed, 29 Aug 2007 13:57:28 -0500 Rating:0 Site Description: Visual Basic tutorial and Best VB tips n tricks Site statistics:Click here
How to Shell out to default web browser 2007-08-29 13:00:33 Kita dapat Memanggil default browser
kemudian menjalankan Url yang
kita inginkan.
Cara menjalankan code:
'Paste code ini pada Module
Declare Function Shell
Execute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal
hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal
lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As
Long
Public Const conSwNormal
Mengubah ukuran tampilan form (Sizable toolwindow) menggunakan SetWindowLong API function 2007-08-29 12:45:26 'Paste kode ini pada Modul
Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd
As Long, ByVal nIndex As Long) As Long
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd
As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const WS_EX_TOOLWINDOW = &H80&
Public Const GWL_EXSTYLE = (-20)
Declare Function SetWindowPos Lib " Read more:function
Menjalankan form selalu berada paling depan 2007-08-29 12:25:14 Ada kalanya kita ingin menampilkan form kita selalu berada paling depan, untuk
mempermudah hal tersebut om akan memberikan solusinya
Deklarasi
Declare Function 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)
Code yang digunakan
'Code ini akan menampilkan form selalu
Disable the close X in a form's upper right corner 2007-08-29 12:12:40 Code berikut ini digunakan untuk mendisable Close X pada form
Cara penggunaan : Copy paste code ini ke form code kemudian jalankan, terlihat
bahwa close X nya sudah disable Option Explicit
Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal Read more:Disable
, corner
Pemenang kontes programming Visual Basic 6.0 source code (www.planet-source-code.com) 2007-08-29 04:51:46 Tahun 2002 sudah lama memang! saya pernah memenangkan kontes programming VB6
Code yang diadakan di planet
-source-code. Tidak ada maksud untuk menyombongkan diri, saya sadar (i'm a bad programmer)
saya hanya memberikan informasi kalo orang
indonesia juga bisa menang..walau cuma sekali hik..hik.
Program ini saya beri nama Avaco Uninstaller 2002 - [Updated : New ! English
Version]
Untuk Read more:Visual
, Basic
Oom - How to know speed form access (VB6) 2007-08-28 16:21:02 You can look your speed form access With simulation. This is very useful If
you want To know access "speed" you form . Very Simple and easy.
'**************************************
' Name: How to knowspeed form access
' Description:This code just to know "speed" form access.
' By: oom
' Paste This code in the module don't in form_Load
' Change Start object as sub main
' For check speed form :
'
Oom - Access Siemens GSM CellPhone With Full AT+Command (VB6 - Open Source) 2007-08-28 16:21:02 Salah satu tool buatan o'om.
This is a full AT+Command for access siemens GSM CellPhone.
This program only to know with handy test AT+Command for Siemens
. With this
program you can know how to access siemens with AT+Command. For example :
AT+CGMI = output [SIEMENS], AT+CGMM = output [C45], Access
Midi (sound) = AT^SBNW="mid",0,1
> 4D5468640000000..... (CTRL-Z) , Access Logo = example : AT^ Read more:Source
Oom - Keyboard Diagnostic 2002 (VB6 - Open Source) 2007-08-28 16:21:02 Ini juga salah satu tool buatan o'om.
this is program for check or
find error on keyboard and another you can look keyboard information. very easy
:) this program like Norton Diagnostic for keyboard. thanks.
Download Source
code :
http://planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=39441&lngWId=1
Tampilan :
User yang telah mengakses code ini sampai
sekarang sebanyak 2307 orang
Percantik halaman blog programmer dengan "New Code Scrolling Ticker" dan "Textbox Search Source Code" 2007-08-28 16:20:42 Jika anda mempunyai blog yang difokuskan pada dunia programming "New Code
Scrolling
Ticker" sangat cocok untuk mempercantik halaman blog programmer anda.
"New Code Scrolling Ticker" merupakan informasi cepat mengenai posting source
code terbaru yang beralamatkan pada
www.planet-source-code.com. Selain menggunakan "New Code Scrolling Ticker"
anda juga bisa mempercantik dengan menggunakan " Read more:Source
, Search
, Source Code
BEST BUY : 11 CD Full Source Code Untuk Programmer 2007-08-28 16:20:42 Selama
ini para programmer mungkin mengalami kesulitan dalam mencari source code (Visual
Basic, Java/Javascript, C/C++, Active Server
Pages, .NET, PHP, Delphi). Dari pada pusing dan menghabiskan waktu
serta menguras keuangan, saya menyarankan lebih baik kalian membeli
Planet Source
Code Jumbo CD. Dengan harga CD yang tidak mahal saya
yakin kalian tidak akan rugi. Coba pikir kembali waktu dan Read more:Programmer
20 Situs Visual Basic Terbaik 2007-08-28 16:16:43 Dibawah ini merupakan 20 kumpulan situs visual basic terbaik yang bisa jadi acuan bagi yang ingin lebih mendalami visual basic.
A1VBCode
- VB Source Code Site: Provides hundreds free VisualBasic
source
code snippets and applications in all categories. Submit your own
code and win monthly VB prizes.
VB Wire: A
Visual Basic news source. This site provides Visual Basic news which
is updated
Widget Installer Generator for Blogger (V1.00 - Beta) by O'om 2008-01-18 12:28:43
"Tool baru buatan oom, tool ini berguna untuk mempermudah membuat proses
widget installer pada blogger"
Pasti rekan sahabat sudah mengetahui button installer untuk blogger dimana button ini jika diklik
akan melakukan installasi otomatis ke blogger,
Saya yakin sebagian blogger sudah bisa membuat installasi ini,
namun bagaimana jika belum pernah berkenalan sama sekali dengan coding HTML atau
javascript? pasti akan bingung cara buat coding intallasinya. Nah untuk itu tool
"Widget InstallerGenerator
for Blogger
v1.00 - beta" saya ciptakan (saya buat).
Software ini bisa dikatakan sederhana namun manfaat dan kemudahan yang didapat
akan melebihi kesederhanaan tool ini. Agar mudah mempelajari tool ini saya buat
se User Friendly mungkin. Please... jangan kritik menge
Best 20 Visual Basic Tutorial 2007-08-31 13:48:05 Dibawah ini merupakan 20 kumpulan situs visual basic terbaik yang bisa jadi acuan bagi yang ingin lebih mendalami visual basic.
A1VBCode
- VB Source Code Site: Provides hundreds free VisualBasic
source
code snippets and applications in all categories. Submit your own
code and win monthly VB prizes.
VB Wire: A
Visual Basic
news source. This site provides Visual Basic news which
is updated daily. The site also provides a weekly VB newsletter which
is delivered to your inbox with all of the past weeks VB news.
AppDev Training:
Developer Training for Visual Basic, ASP, XML, SQL Server, VBA,
Microsoft Access, Visual InterDev, and FoxPro through CD’s,
videos, classes and licensing.
ITtoolbox
Portal for Visual Basic: Content, community, and service for
Visual Basic professionals. Provi Read more:Tutorial
Menjalankan form selalu berada paling depan "alwasy on top" 2007-08-31 13:44:29 Ada kalanya kita ingin menampilkan form kita selalu berada paling depan, untuk
mempermudah hal tersebut om akan memberikan solusinya
Deklarasi
Declare Function 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)
Code yang digunakan
'Code ini akan menampilkan form selalu didepan
rtn = SetWindowPos(OnTop.hwnd, -2, 0, 0, 0, 0, 3)
'Code ini untuk mengembalikan fungsi diatas
rtn = SetWindowPos(OnTop.hwnd, -1, 0, 0, 0, 0, 3)
Cara Menjalankan : Copy code di bawah pada form code)
Declare Function 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 Lon
How to Shell out to default web browser 2007-08-29 13:00:33 Kita dapat Memanggil default browser
kemudian menjalankan Url yang
kita inginkan.
Cara menjalankan code:
'Paste code ini pada Module
Declare Function Shell
Execute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal
hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal
lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As
Long
Public Const conSwNormal = 1
'Paste code ini pada CommanButton
ShellExecute hwnd, "open", "", vbNullString,
vbNullString, conSwNormal
Mengubah ukuran tampilan form (Sizable toolwindow) menggunakan SetWindowLong API function 2007-08-29 12:45:26 'Paste kode ini pada Modul
Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd
As Long, ByVal nIndex As Long) As Long
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd
As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const WS_EX_TOOLWINDOW = &H80&
Public Const GWL_EXSTYLE = (-20)
Declare Function 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) As Long
Public Const SWP_FRAMECHANGED = &H20
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOZORDER = &H4
Public Const SWP_NOSIZE = &H1
'Paste code ini pada form code
Pri Read more:function
Disable the close X in a form's upper right corner 2007-08-29 12:12:40 Code berikut ini digunakan untuk mendisable Close X pada form
Cara penggunaan : Copy paste code ini ke form code kemudian jalankan, terlihat
bahwa close X nya sudah disable Option Explicit
Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Const MF_BYPOSITION = &H400&
Private ReadyToClose As Boolean
Private Sub RemoveMenus(frm As Form, _
remove_restore As Boolean, _
remove_move As Boolean, _
remove_size As Boolean, _
remove_minimize As Boolean, _
remove_maximize As Boolean, _
remove_seperator As Boolean, _
remove_close As Boolean)
Dim hMenu As Long
' Mengambil dari menu handle pada form
hMenu = Read more:Disable
, corner
Pemenang kontes programming Visual Basic 6.0 source code (www.planet-source-code.com) 2007-08-29 04:51:46
Tahun 2002 sudah lama memang! saya pernah memenangkan kontes programming VB6
Code yang diadakan di planet
-source-code. Tidak ada maksud untuk menyombongkan diri, saya sadar (i'm a bad programmer)
saya hanya memberikan informasi kalo orang
indonesia juga bisa menang..walau cuma sekali hik..hik.
Program ini saya beri nama Avaco Uninstaller 2002 - [Updated : New ! English
Version]
Untuk memudahkan saya beri tanya jawab sedikit ya..
Q : Om Program apa ini?
A : Ini adalah program yang sangat complete untuk melakukan uninstaller windows
atau add/remove.
Q : Apa saja yang dilakukan program ini?
A : Dengan program ini anda dapat :
- Mengedit Entry pada Uninstall Registry.
- Menghapus Entry pada Uninstall Register.
- Membuat Entry ba Read more:Visual
, Basic
Oom - How to know speed form access (VB6) 2007-08-28 16:21:02 You can look your speed form access With simulation. This is very useful If
you want To know access "speed" you form . Very Simple and easy.
'**************************************
' Name: How to knowspeed form access
' Description:This code just to know "speed" form access.
' By: oom
' Paste This code in the module don't in form_Load
' Change Start object as sub main
' For check speed form :
' run the form for the first time and look how many
' you get access on speed form.
' Step two load picture or large picture in form and
' then check again how many form speed is u get.
'**************************************
Private Declare Function GetTickCount Lib "kernel32" () As Long
Sub main()
Dim lSpeedTime As Long
Dim SInfoSpeed As String
lSpeedTime = GetTickCo
Oom - Keyboard Diagnostic 2002 (VB6 - Open Source) 2007-08-28 16:21:02 Ini juga salah satu tool buatan o'om.
this is program for check or
find error on keyboard and another you can look keyboard information. very easy
:) this program like Norton Diagnostic for keyboard. thanks.
Download Source
code :
Tampilan :
User yang telah mengakses code ini sampai
sekarang sebanyak 2307 orang dari seluruh dunia.
Oom - Access Siemens GSM CellPhone With Full AT+Command (VB6 - Open Source) 2007-08-28 16:21:02 Salah satu tool buatan o'om.
This is a full AT+Command for access siemens GSM CellPhone.
This program only to know with handy test AT+Command for Siemens
. With this
program you can know how to access siemens with AT+Command. For example :
AT+CGMI = output [SIEMENS], AT+CGMM = output [C45], Access
Midi (sound) = AT^SBNW="mid",0,1
> 4D5468640000000..... (CTRL-Z) , Access Logo = example : AT^SBNW="bmp",0,0 and
any other.
Download Source
code :
Tampilan :
User yang telah mengakses code ini sampai sekarang sebanyak 4730 orang dari
seluruh dunia.
Percantik halaman blog programmer dengan "New Code Scrolling Ticker" dan "Textbox Search Source Code" 2007-08-28 16:20:42 Jika anda mempunyai blog yang difokuskan pada dunia programming "New Code
Scrolling
Ticker" sangat cocok untuk mempercantik halaman blog programmer anda.
"New Code Scrolling Ticker" merupakan informasi cepat mengenai posting source
code terbaru yang beralamatkan pada
www.planet-source-code.com. Selain menggunakan "New Code Scrolling Ticker"
anda juga bisa mempercantik dengan menggunakan "Textbox SearchSource
Code",
berbeda dengan Scrolling Ticker pada Textbox Search ini dikhusus kan melakukan
proses pencarian langsung pada halaman yang dicari sesuai dengan categori yang
dipilih.
Sampel dari "New Code Scrolling Ticker"
Your browser does not support inline frames...However, you can click here to see the related document.
Read more:Source Code
BEST BUY : 11 CD Full Source Code Untuk Programmer 2007-08-28 16:20:42 Selama
ini para programmer mungkin mengalami kesulitan dalam mencari source code (Visual
Basic, Java/Javascript, C/C++, Active Server
Pages, .NET, PHP, Delphi). Dari pada pusing dan menghabiskan waktu
serta menguras keuangan, saya menyarankan lebih baik kalian membeli
Planet Source
Code Jumbo CD. Dengan harga CD yang tidak mahal saya
yakin kalian tidak akan rugi. Coba pikir kembali waktu dan uang yang kalian
keluarkan jika harus online ke internet?
Sedikit penjelasan Planet Source Code Jumbo CD adalah hampirsemua source code
yang dikumpulkan ke dalam beberapa CD sesuaidengan categori pilihan. Saya
ingatkan bahwa situs ini mempunyai baris code sebanyak 12,539,901. Kalian bisa
bayangkan aja sendiri jika membeli semua CD nya hampir semua code ada dalam
genggaman kalian.
Apakah ada cara Read more:Programmer