![]() |
| Menggunakan Drag-Drop ( Visual Basic ) |
Drag-Drop merupakan istilah umum di dalam penggunaan mouse untuk menggeser, menyalin atau memindahkan gambar, teks, file, dll. Menggunakan drag-drop akan mempermudah user saat menggunakan sebuah program.
14.2. Drag-Drop dengan VB 6.0
VB 6.0 menyediakan beberapa property, method dan event yang berhubungan dengan drag-drop. Operasi drag-drop melibatkan object source dan object target. Setiap object di dalam form bisa menjadi source ataupun target (termasuk form itu sendiri).
Property, method
dan event yang berhubungan dengan drag-drop adalah sebagai berikut:
Property
|
Object
|
Keterangan
|
|
DragMode
|
Source
|
Menentukan
bagaimana drag-drop dimulai:
|
|
- Manual
(vbManual = 0, default) atau
|
|||
- Otomatis (vbAutomatic = 1)
|
|||
DragIcon
|
Source
|
Menentukan
bentuk pointer saat operasi drag-drop
|
|
berlangsung.
|
Method
|
Object
|
Keterangan
|
|
Drag [action]
|
Source
|
Digunakan
untuk memulai drag-drop secara manual
|
|
(property DragMode diset
vbManual).
|
|||
Event
|
Object
|
Keterangan
|
|
DragOver
|
Target
|
Saat object
source di-drag melewati object target.
|
|
DragDrop
|
Target
|
Saat object source di-drop pada
object target.
|
Nilai untuk
argumen action adalah sebagai berikut:
Nilai
|
Keterangan
|
vbBeginDrag =
1
|
Memulai
operasi drag-drop
|
vbCancel = 0
|
Membatalkan
operasi drag-drop
|
vbEndDrag = 2
|
Mengakhiri operasi drag-drop
|
Ada
tiga argumen pada event-event drag -drop, yaitu: Source, X,
Y dan State. Argumen Source menunjukkan object yang menjadi
source. Argumen X dan Y menunjukkan posisi koordinat pointer mouse. Sedangkan
argumen State menunjukkan status pointer pada saat event DragOver, nilainya
terdiri dari: 0 Æ
pointer masuk ke dalam object target, 1 Æ
pointer meninggalkan object target dan 2 Æ
pointer bergerak di dalam object target.
14.3. Contoh Program: Drag-Drop Test
Download Selengkapnya dalam file PDF berikut , " Visual Basic 014 "

Terima Kasih atas masukan anda