如何在vb.net中設置當前圖像位置

如果我使用拖放功能，我如何在vb.net中設置當前圖像位置。它似乎像imagelocation不起作用，因爲我試圖使用messagebox輸出圖像位置。但它沒有顯示任何東西。如何獲取我剛剛放入圖片盒的文件的圖像位置，以便我可以將其傳輸到另一個目錄中？如何在vb.net中設置當前圖像位置

Private Sub pb_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles pb.DragDrop 
      Dim FileToMove As String 
      Dim MoveLocation As String 
      Try 
       pb.Image = Image.FromFile(CType(e.Data.GetData(DataFormats.FileDrop), Array).GetValue(0).ToString) 



       FileToMove = pb.ImageLocation 


       MoveLocation = "C:\pics\" + TextBox1.Text + ".jpg" '" 

       If System.IO.File.Exists(FileToMove) = True Then 
        System.IO.File.Move(FileToMove, MoveLocation) 

       End If 
      Catch ex As Exception 
       MessageBox.Show("Error Doing Drag/Drop") 
      End Try 
     End Sub

來源

2010-12-02 Wern Ancheta

與你的問題分開，但使用Path.Combine（「C：\ pics」，textbox1.text +「.jpg」）。還要將「C：\ pics」部分抽象爲一個配置元素。 – 2010-12-02 04:14:03

爲什麼不將e.Data.GetData(DataFormats.FileDrop), Array).GetValue(0).ToString保存爲變量？這是你正在尋找的文件路徑。不知道爲什麼ImageLocation屬性不起作用。

來源

2010-12-02 05:32:11 decyclone

FileToMove = CType（e.Data.GetData（DataFormats.FileDrop），Array）.GetValue（0）.ToString -it不會工作，如果我這樣做 – 2010-12-03 00:39:29

如何在vb.net中設置當前圖像位置

回答

相關問題