weixin_42387066的博客

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load PictureBox1.AllowDrop = True End Sub Private Sub PictureBox1_DragEnter(sender As Object, e As DragEventArgs) Handl...