Bagaimana untuk menyediakan fungsionalitas drag-and-drop file pada Visual Basic 2005 atau Visual Basic.NET aplikasi

Prosedur langkah demi langkah dalam artikel ini menunjukkan bagaimana untuk menyediakan fungsionalitas drag-and-drop file di Microsoft Visual Basic 2005 atau Microsoft Visual Basic.NET aplikasi. A ListBox kontrol yang digunakan sebagai tujuan prosedur drag-and-drop file.

Persyaratan

Daftar berikut menguraikan fitur perangkat keras, perangkat lunak, jaringan infrastruktur, dan paket layanan yang Anda butuhkan:

• Visual Basic 2005 atau Visual Basic.NET

Artikel ini mengasumsikan bahwa Anda sudah familiar dengan topik-topik berikut:

• Windows Forms ListBox kontrol
• Penanganan event Windows Forms

Langkah-langkah untuk membangun sampel

The ListBox kontrol menyediakan dua peristiwa drag-and-drop yang Anda butuhkan untuk menangani: DragEnter dan DragDrop. The DragEnter peristiwa terjadi ketika Anda menyeret objek dalam batas-batas kontrol dan digunakan untuk menentukan apakah objek yang sedang diseret adalah salah satu yang Anda ingin Izinkan untuk menjatuhkan pada control. Anda menangani acara ini untuk kasus-kasus di mana sebuah file atau file diseret ke kontrol. Hal ini memungkinkan ikon yang sesuai untuk ditampilkan ketika objek menyeret alih, tergantung pada objek yang sedang diseret. The DragDrop peristiwa terjadi ketika objek yang sedang diseret telah dirilis pada kontrol. Anda menangani acara ini untuk mengambil objek. The Data objek digunakan untuk mengambil data.

The Data objek GetData metode mengembalikan sebuah array dari string yang berisi nama path lengkap file yang diseret ke ListBox kontrol. Anda dapat menggunakan informasi lintasan berkas ini untuk melakukan operasi apa pun yang diperlukan pada file. Sebagai contoh, Anda dapat menggunakan kelas di System.io namespace untuk membuka dan membaca file, memindahkan file, atau Salin file ke lokasi baru. Sampel ini hanya menambah path lengkap file yang diseret untuk ListBox kontrol.

Untuk menyediakan fungsionalitas drag-and-drop file pada Visual Basic 2005 atau Visual Basic.NET aplikasi, ikuti langkah berikut:

1. Menciptakan bentuk aplikasi Windows baru pada Visual Basic 2005 atau Visual Basic.NET. Form1 dibuat secara default.
2. Menggunakan toolbox untuk menambahkan ListBox mengontrol Form1.
3. Pada jendela Properties, mengubah AllowDrop properti ListBox kontrol untuk Benar untuk memungkinkan objek menyeret ke kontrol.
4. Dalam solusi Explorer, klik kanan Form1, dan kemudian klik Lihat kode.
5. Untuk menangani DragEnter acara, menambahkan metode berikut di bawah bagian kode yang menghasilkan Windows Form Designer di kelas Form1:

       Private Sub ListBox1_DragEnter(ByVal sender As Object, _
                                      ByVal e As System.Windows.Forms.DragEventArgs) _
                                      Handles ListBox1.DragEnter
           If (e.Data.GetDataPresent(DataFormats.FileDrop)) Then
               e.Effect = DragDropEffects.All
           Else
               e.Effect = DragDropEffects.None
           End If
       End Sub
   					

6. Untuk menangani DragDrop acara, menambahkan metode berikut untuk kelas Form1 segera mengikuti metode yang ditambahkan pada langkah 5:

       Private Sub ListBox1_DragDrop(ByVal sender As Object, _
                                     ByVal e As System.Windows.Forms.DragEventArgs) _
                                     Handles ListBox1.DragDrop
           Dim s() As String = e.Data.GetData("FileDrop", False)
           Dim i As Integer
           For i = 0 To s.Length - 1
               ListBox1.Items.Add(s(i))
           Next i
       End Sub
   					

7. Membangun dan menjalankan proyek.
8. Tarik satu atau lebih file dari desktop atau lain folder untuk ListBox kontrol. Perhatikan bahwa path lengkap file ditambahkan ke ListBox kontrol.

Untuk informasi lebih lanjut, kunjungi situs Web Microsoft Developer Network (MSDN) berikut: