将文件传输到特定位置，确切地说是USB

Question

问题是，我想用VB进行文件传输

1-我已经有拖放窗口，用户拖放他们的文件放在那个窗口上..它取决于用户是否要将文件传输到USB驱动器..可以这样做吗？

2 - 这里是我拖拽窗口的代码..

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

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

3 - 所以我想要做的是，无论文件丢失在哪里都可以转移到USB ...用户点击“转移”