Cara Membuat Form Border None Dapat Di Gerakkan Oleh Mouse Vb6

Bagi yang senang berkreasi dengan Visual Basic kali ini saya akan membagikan tips agar form border None dapat di gerakan secara manual oleh mouse, oke kalo begitu langsung saja berikut caranya


Aplikasi dengan form type : none tetapi untuk tipe ini tidak bisa di gerakkan oleh mouse.? berikut cara memasukkan source kode dan source kodenya.

Pertama klik dua kali pada form dengan border NONE tersebut dan lihat di kanan atas pilih dan cari Mouse_Move kemudian masukkan kode berikut langsung ke dalamnya.

If Me.WindowState <> 0 Then Exit Sub
 
Static l As Integer, t As Integer
If Button = 1 Then
  Me.Left = (Me.Left + X) - l
  Me.Top = (Me.Top + Y) - t
Else
  l = X
  t = Y
End If

Setelah itu tekan tombol F5 kemudian lihat hasilnya, cukup simple bukan? jika ada yang ingin di tanyakan atau eksekusi kode gagal silahkan komentar di kolom komentar di bawah ya.. have fun!

1 Response to "Cara Membuat Form Border None Dapat Di Gerakkan Oleh Mouse Vb6"