私環境では複数取得できます。 Microsoft Visual Studio Community 2019 Microsoft .NET Framework Version 4.8.03761
Private Sub txt1_DragDrop(sender As Object, e As DragEventArgs) Handles txt1.DragDrop Dim d$() d = CType(e.Data.GetData(DataFormats.FileDrop, False), String()) End Sub
Private Sub txt1_DragEnter(sender As Object, e As DragEventArgs) Handles txt1.DragEnter If e.Data.GetDataPresent(DataFormats.FileDrop) Then e.Effect = DragDropEffects.Copy End Sub
akuro 2022/03/22 (Tue) 12:34:02
Microsoft Visual Studio Community 2019
Microsoft .NET Framework Version 4.8.03761
Private Sub txt1_DragDrop(sender As Object, e As DragEventArgs) Handles txt1.DragDrop
Dim d$()
d = CType(e.Data.GetData(DataFormats.FileDrop, False), String())
End Sub
Private Sub txt1_DragEnter(sender As Object, e As DragEventArgs) Handles txt1.DragEnter
If e.Data.GetDataPresent(DataFormats.FileDrop) Then e.Effect = DragDropEffects.Copy
End Sub