Peluang BISNIS Kursus Online: Belajar HTML, PHP & MySQL Sambil Menghasilkan UANG

Microsoft Visual Basic 6.0: Drag Jendela lewat Textbox




Mau Cari Informasi tentang Teknologi/Game? Cari Artikel Disini!


Terbit 22.02.2006. Edisi Feb 2006. Sudah ada 5 Komentar.
DHINATACOM

Untuk menggeser suatu jendela aplikasi, biasanya kita lakukan lewat title bar pada jendela. Ada banyak jalan menuju Roma, demikian pula ada banyak juga cara untuk menggeser jendela aplikasi. Dengan menggunakan Visual Basic 6.0, kita akan mencobanya dengan menggeser jendela lewat Textbox. Lalu bagaimana caranya ?

Langkah-langkahnya tidak terlalu sulit :
1. Buka aplikasi  Visual Basic 6.0 lewat [Start] > [All Programs] > [Microsoft Visual Studio 6.0] > [Microsoft Visual Studio 6.0].
2. Pada jendela New Project, pilih tab New.
3. Pada tab New, pilihlah Standard EXE dan klik [ Open ] untuk membuka Jendela Project1 - Form1 (Form).
4. Buat Textbox pada jendela Project1 - Form1 (Form).
5. klik [View] >

CODE:
  1. untuk membuka jendela Project1 – Form1 (Code)
  2. 6. Ketikkan kode program berikut ini :
  3.  
  4. [code]Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
  5. (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lparam _
  6. As Any) As Long
  7. Private Declare Sub ReleaseCapture Lib "user32" ()
  8. Public Sub GeserJendela(TheForm As Form)
  9. ReleaseCapture
  10. Call SendMessage(TheForm.hWnd, &HA1, 2, 0&)
  11. End Sub
  12.  
  13. Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  14. GeserJendela Me
  15. End Sub

7. Simpan dan jalankan dengan menekan [F5].

Sekarang coba pastikan pointer mouse berada di atas textbox dan segera klik kiri, tahan dan geser mouse anda. Apakah jendela aplikasi ikut bergeser ? jika ya, selamat anda telah berhasil !!!

Baca Juga:







Powered by FeedBlitz

komentar pembaca DHINATACOM

mas,ad tutorial bkin database dengan mnggunakan VB 6.0 ga?? bingung neh gmn caranya?? nangis gatau

coba cari di forum2 diskusi tentang Ti seperti http://Diskusiweb.com disana ada lebih banyak programmer andal mba

 
 

mas,klo coding bwt ngirim email lewat vb6 gmn y??
nangis

 

da yg kelupaan mas, ehm... gni ato g' ngirim comment kyk yg q lakuin skrang tp lewat vb6,jd q g usah masuk ke webny mas,tp q bs kirim comment,kira2 gmna y?? ksh tutorial yg lengkap mas... love

best regard

 
 
Nama (harus diisi)
E-mail (harus diisi - tidak akan ditampilkan)
Alamat Website/Blog Anda. (tidak wajib diisi)

Komentar Anda (smaller size | larger size)
yess . tipi . tendang . sombong . sinchan . sial . senam . nyerah . ngiler . nggaya . nangis . musik . males . love . konslet . kembar . gatau . damn . bye . ayuk . ngacir . nocomment . malu . mimpi . licik . ide . capedeh . cendol . batamerah . salaman . recseller . cekemail . maho . marah . najis . takut . ngacir2 . sundul . janganribut . capedeh2 . nosara . kacau .
Petunjuk komentar:
1. Tolong tulis komentar yang berhubungan dengan topik artikel. Jangan mengirim SPAM!
2. Tag standar HTML yang diperbolehkan:
    <a href> <blockquote> <code> <strike> <strong>
3. Komentar yang tidak berhubungan atau SPAM akan dihapus.
4. Klik gambar emoticon diatas untuk menampilkannya pada komentar Anda.

Catatan: Beberapa emoticon yang ditampilkan merupakan hak cipta dari Kaskus - The Largest Indonesian Community.